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This  research  Is  concerned  with  providing  a  means  to  rapidly  answer 
"what- 1C"  questions  about  force  structure  problems  for  the  Air  Force 
Vide  Mission  Area  Analysis  Division  (AF/XOXR-MAA) .  Currently, 
AF/XOXR-MAA  uses  a  deterministic  computer  model  known  as  the  Arsenal 
Exchange  Model  (AEM)  to  answer  "what-if"  type  questions.  However,  three 
hours  of  wall-clock  time  are  required  for  just  one  AEM  execution. 

Response  Surface  Methodology  (RSM)  techniques  that  Include  experi¬ 
mental  designs  and  regression  analysis  are  automated  by  Fortran-77  code. 
For  user  defined  problems,  this  automated  RSM  package  replaces  the  AEM 
with  a  second-order  polynomial  equation.  The  polynomial  equation  can 
then  be  used  to  answer  "what-lf"  questions  In  "real  time"  through  its 
predictability  powers  and/or  through  applied  Informational  analysis. 

An  eighteen-variable  (reduced  to  twelve  variables)  example  is  used 
to  show  how  well  the  automated  RSM  package  works  with  the  AEM.  The 
example  is  ran  on  AFIT's  VAX  11/785  main-frame  computer.  Also,  from  the 
main-frame's  software  collection,  the  Statistical  Analysis  Software 
(SAS)  package  Is  used  to  verify  the  regression  analysis  portion  of  the 
automated  RSM  package. 
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AUTOMATING  RESPONSE  SURFACE  METHODOLOGY 
FOR  THE  ARSENAL  EXCHANGE  MODEL 

Chapter  One:  The  Problem 

Introduction 

This  research  effort  is  concerned  with  automating  Response  Surface 
Methodology  (RSM)  to  the  Arsenal  Exchange  Model  (AEM).  The  purpose  is 
to  develop  a  model  that  can  substitute  for  the  AEM.  However,  the  alter¬ 
nate  model  will  be  able  to  more  quickly  produce  a  response  while 
increasing  the  capability  of  informational  analysis  (defined  in  the  Key 
Terms  section  of  this  chapter).  This  research  endeavor  is  in  response 
to  a  problem  faced  by  the  Air  Force  Vide  Mission  Area  Analysis  Division 
( AF/XOXR-MAA) . 

This  chapter  defines  and  gives  some  background  to  the  problem; 
lists  the  research  objectives,  scope,  and  assumptions;  and,  cites  the 
problem  solving  methodology.  Chapter  Two  contains  the  literature  review 
on  previous  applications  of  RSM  to  deterministic  and  stochastic  models. 
Also,  Chapter  Two  describes  the  AEM  and  delineates  the  elements  of  RSM. 
The  automated  methodology  steps  along  with  the  programming  tools  that 
automate  the  methodology  is  outlined  and  explained  in  detail  in  Chapter 
Three.  Chapter  Four  explains  how  the  automated  RSM  works  through  an 
example  AF/XOXR-MAA  problem.  Chapter  Four  presents  the  results  of 
applying  the  methodology  to  the  similar  AF/XOXR-MAA  problem,  and  Chapter 
Five  closes  this  report  with  observations,  conclusions,  and  recommen¬ 


dations. 


Problem  Background 


The  Air  Force  Wide  Mission  Area  Analysis  Division  ( AF/XOXR-MAA) 
evaluates  the  US  strategic  offensive  capability  by  allocating  strategic 
offensive  resources  ".  .  .to  maximize  strategic  offensive  capability  In 
accordance  with  assigned  mission  area  Importance  and  goals"  (23:2).  For 
the  evaluation,  data  Is  gathered  from  a  deterministic  model  known  as  the 
Arsenal  Exchange  Model  (AEM).  The  AEM  allocates  US  strategic  offensive 
resources  according  to  national  targeting  guidance  and  evaluates  the 
success  of  the  allocations  through  damage  expectancy  calculations. 

In  addition  to  measuring  the  success  of  US  resource  allocations,  a 
significant  part  of  the  evaluation  is  the  use  of  informational  analysis 
to  answer  "what-if"  questions.  Usually,  informational  analysis  is 
performed,  through  conventional  methods,  by  varying  one  AEM  parameter  at 
a  time  and  executing  the  AEM  for  each  parameter  change.  Therein  lies 
the  problem.  According  to  AF/XOXR-MAA's  Major  Leonard,  the  AEM  requires 
approximately  three  hours  (50  minutes  CPU  time)  to  make  one  execution 
(16).  Since  each  execution  of  the  AEM  takes  approximately  three  hours, 
answering  "what-if"  questions  is  very  slow.  Consequently,  according  to 
Major  Leonard,  there  is  currently  no  way  to  rabidly  answer  predictable 
"what-if"  questions  about  force  structure  and  other  parameter  changes 


Research  Problem 

Automate  the  application  of  Response  Surface  Methodology  (RSM)  to 
the  AEM  to  rapidly  predict  AEM  output  from  approximated  polynomial 
equations  and  to  assist  in  performing  informational  analysis  for  the  Air 
Force  wide  Mission  Area  Analysis  strategic  offensive  mission  area. 


Research  Question 


Can  Smith's  RSM  variant  be  automated  with  the  ABM  to  allow  accurate 
predictability,  give  time  efficient  informational  analysis,  and  produce 
more  information  from  the  analysis  ( 25; 26; 27 ) ? 

Research  Objective 

Automate  Smith's  RSM  variant  with  the  ABM,  document  the  automation, 
and  then  demonstrate  the  automation  to  AF/XOXR-MAA  by  applying  the 
automated  RSM  to  a  strategic  force  structure  problem. 

Key  Terms 

Smith's  RSM  Var iant .  Smith's  RSM  variant  is  the  application  of  RSM 
to  deterministic  models  to  enhance  informational  analysis  capabilities 
(25; 26; 27).  The  RSM  composition  includes  a  postulated  model  of  the  true 
response  surface  (usually  a  low-order  polynomial  equation),  an  experi¬ 
mental  design  that  explains  how  to  gather  the  data  necessary  to  estimate 
the  postulated  model,  and  regression  analysis  to  perform  the  estimation 
of  the  postulated  model's  coefficients. 

Arsenal  Bxchanqc  Model  (ABM) .  The  ABM  is  a  linear,  goal- 
programming,  weapon-to-target  optimal  allocation  model  (5).  The  ABM 
specifically  addresses  strategic  force  analysis  and  design  problems 
(5:1-1). 

Informational  Analysis.  Informational  analysis  refers  to  any 
method  that  generates  "additional''  information  for  the  decision  maker 
beyond  that  of  just  the  solution  obtained  from  solving  the  problem  using 
baseline  problem  data  and  assumptions.  Informational  analysis  involves 
examining  the  impact  of  changes  to  the  problem  composition,  such  as 
variables,  coefficients,  objectives,  weighting  factors,  and/or 


constraints.  Applying  informational  analysis  to  a  problem's  composition 
helps  a  decision  maker  understand  how  sensitive  a  solution  may  be  to 
certain  problem  components. 

Subsidiary  Objectives 

Automation.  Perform  the  necessary  coding  to  automate  the  RSM 
variant  with  the  ABM.  "Necessary  coding"  Involves  allowing  user  Input 
for  problem  definition,  parameter  coding  and  decoding,  coded  and  decoded 
experimental  design  generations,  ABM  data  collection,  and  regression 
analysis. 

AKH  Setup.  Develop  an  unclassified  multiple  objective  weapon-to- 
target  allocation  problem  similar  in  dimension  (weapons,  targets,  etc.) 
to  the  type  used  in  the  AF/XOXR-MAA  strategic  offensive  mission  area. 
This  includes  AF/XOXR-MAA  designating  the  important  variables  (those  to 
which  informational  analysis  would  be  applied)  to  be  used  with  the  ABM. 

Response  Surface.  Develop  a  response  surface  for  each  objective  by 
varying  several  key  parameters  over  their  expected  range.  The  number  of 
parameters  will  be  sufficient  to  make  this  automated  RSM  process  useful 
to  AF/XOXR-MAA. 

Validation.  Bach  response  surface  equation  is  an  alternate  model 
that  replaces  the  ABM  for  each  objective.  The  alternate  models  will 
estimate  the  ABM's  responses  for  any  given  set  of  input.  However,  to 
Insure  the  alternate  models  can  be  used  in  place  of  the  ABM,  the  alter¬ 
nate  models  are  validated.  The  response  surface  equations  are  validated 
by  comparing  their  responses  to  responses  generated  by  the  ABM  using  the 
same  random  input.  The  alternate  models  can  be  used  if  the  results  of 
the  comparisons  are  within  user  limits. 


Evaluation.  Evaluate  the  use  of  Informational  analysis  for 
AF/XOXR-MAA  through  graphs  and  plots  of  the  problem's  components. 


Portability.  Examine  the  portability  of  this  automated  RSH  process 
to  AF/XOXR-MAA.  To  a  degree,  the  automation  objective  is  encompassed  by 
portability  because  the  type  of  coding  and  use  of  the  coding  must  be 
compatible  between  AFIT  and  AF/XOXR-MAA  computer  systems. 

EMLPMIRntetlpng.  Examine  the  possibility  of  further  automation  to 
Include  the  use  of  other  postulated  models  and  experimental  designs. 

Scope/ Assumptions 

Problem.  A  problem  with  five  objectives  is  evaluated.  Four  of  the 
five  objectives  measure  the  results  of  veapon-to-target  (resource)  allo¬ 
cations  through  mutually  exclusive  target  categories:  leadership/ 
communication,  command,  control,  and  intelligence;  strategic  nuclear; 
conventional;  and  industrial/economic.  The  fifth  objective  measures  the 
overall  resource  allocation  results.  The  measure  of  effectiveness  for 
each  of  the  five  objectives  is  damage  expectancy  (DE)  which  is  ”The 
probability  of  achieving  a  desired  level  of  damage,  considering 
prelaunch  survivability,  weapon  system  reliability,  weather /dark ness 
factors,  penetration  probability  and  weapon  effects”  (8:11). 

Problem  Type.  Problem  composition  is  similar  to  AF/XOXR-MAA 
problems:  resource  allocation  goals  (damage  expectancy)  are  setup;  the 
allocations  themselves  are  defined;  targeting  strategies  and  targeting 
priorities  are  employed;  and  the  targeting  constraints  are  listed. 
However,  the  problem  will  not  be  classified,  as  are  the  AF/XOXR-MAA 
problems.  An  unclassified  problem  will  allow  wider  dissemination  and 
application  of  the  results  of  this  thesis. 


factor  Ranoo.  The  range  of  each  factor  is  fixed.  If  the  range  of 
a  factor  Increases,  l.e.,  the  factor's  alnlaua  and/or  aaxlaua  level 
changes  so  that  the  factor's  nev  range  becomes  larger  than  Its  foraar, 
the  entire  process  of  generating  R8H  curves  has  to  be  repeated  (27:62) . 

Ixtrapolatlon.  Mfi  BXTBAPOLATIOM  can  be  perforaed  beyond  the  ranges 
of  the  factor  levels  (27:62).  The  scope  of  the  surface  as  described  by 
the  polynoalal  equation  Is  Halted  by  the  ranges  of  the  variables  used 
to  "fit*  the  polynoalal  equation.  Therefore,  It  Is  dangerous  to  deduce 
any  results  outside  the  scope  of  the  surface. 

Autoant Ion.  The  autoaatlon  process  begins  with  AKH  data  Input. 

The  data  Is  then  organized  according  to  the  applicable  experlaental 
design.  The  autoaatlon  continues  by  controlling  AIM  executions  and 
collecting  all  ARM  output.  Finally,  the  autoaatlon  Is  coaplete  when  a 
regression  package  uses  a  coded  version  of  the  experlaental  design  with 
the  ABM  output  to  select  the  variables  of  the  postulated  aodel. 

iohmHqu.  Bach  objective's  response  surface  can  be  approxlaated 
by  a  second-order  polynoalal.  The  second-order  polynoalal  equation  Is  a 
popular  aodel  and  has  previously  been  used  vlth  other  arsenal  exchange 
aodels  In  previous  theses  (l.e.,  Graney's,  Ishlhara's,  and  Johnson's 
which  are  discussed  In  Chapter  Two  ( 11; 14; 15 ) ) . 

AEilflsgfl.  nottoflgiMy 

A  weapon-to-target  allocation  problea  Is  first  setup.  An  appli¬ 
cable  experlaental  design  Is  used  to  gather  ABM  output  which  Is  then 
used  as  Input  to  a  regression  analysis  technique.  The  output  froa  the 
regression  analysis  Is  then  used  to  construct  the  polynoalal  equations 
that  represent  the  ABM.  The  polynoalal  equations  are  validated,  and, 


following  a  successful  validation,  the  polynomial  equations  are  used  for 
MM  predictability  and  for  Informational  analysis. 

Cornel us  ion 

This  chapter  described  the  research  problem,  listed  the  research 
objectives  and  associated  scope/assumptions,  and  briefly  described  the 
problem  solving  methodology.  The  next  chapter  reviews  literature 
involving  previous  work  done  on  the  application  of  Smith's  RSH  variant 
to  deterministic  and  stochastic  models.  Chapter  Two  also  examines  the 
ABM  and  reviews  literature  on  the  elements  that  constitute  RSH,  i.e., 
response  surfaces,  experimental  design,  and  regression  analysis. 


Chapter 


Literature  Bevi&y 


Introduction 

First,  a  definition  is  presented  on  the  term  "Smith's  RSN  variant". 
Second,  a  search  through  earlier  AFIT  theses  is  accomplished  to  show  how 
Smith's  RSM  variant  was  previously  applied.  Next,  the  ASM,  the  model 
whose  output  is  to  be  "captured"  through  the  automated  RSM  process,  is 
briefly  described.  The  components  of  R8M  are  then  expounded  upon  so 
that  the  reader  becomes  familiar  with  the  "workings"  of  R8H.  Finally, 
to  orient  the  reader,  the  applicability  of  RSM  to  the  ABM  will  be  shown 
throughout  this  chapter. 


Smith's  RSM  Variant 

Before  describing  the  RSM  variant,  the  classical  use  of  RSM  is 
first  defined.  A  good  definition  of  classical  RSM  is  given  by  Douglas 
Montgomery: 

Response  surface  methodology,  or  R8M,  is  a  collection  of 
mathematical  and  statistical  techniques  useful  for  analysing 
problems  in  which  several  Independent  variables  influence  a 
dependent  variable  or  response,  and  the  goal  is  to  optimize 
this  response.  (20:445) 

The  R8M  variant  was  first  formulated  and  used  by  Smith  in  his 
dissertation  (25).  Later,  in  two  separate  papers  (the  latter  an  update 
of  the  first),  Smith  and  Helllchamp  explained  the  purpose  for  this  RSM 
variant: 


.  .  .  provides  an  expanded  capability  for  conducting  a  more 
valuable  analysis  in  a  complex  environment.  It  provides  a 
picture  of  what  is  happening  within  the  model  being  used  for 
the  study.  It  also  provides  insight  into  the  relationship 
among  the  factors  under  study.  "What  if"  analyses  can  be 
conducted  economically  and  in  real  time  without  the  necessity 
to  obtain  new  computer  outputs.  Derived  contributions  of  each 


parameter  to  the  value  of  the  measure  of  effectiveness  and 
ratio  comparisons  of  the  different  coefficients  of  the  model 
parameters  provide  a  new  measure  of  effectiveness  for 
comparing  the  worth  and  capability  of  one  system  vs  another 
within  the  context  of  the  model.  (26; 27) 

Thus,  the  goal  of  Smith's  RSM  variant  is  not  to  optimize  a  response,  as 

is  the  goal  of  classical  RSH,  but  rather  to  facilitate  the  use  of 

informational  analysis  as  applied  to  deterministic  models. 

Previous  Applications 

There  has  not  been  any  previous  work  done  to  automate  RSM  with  the 
ABM;  thus,  apt \ylng  the  RSM  to  the  ABM  through  automation  is  the  unique 
contribution  of  this  thesis.  Smith's  RSM  variant  has,  however,  been 
used  in  previous  AFIT  theses,  specifically,  from  1993  to  1996,  nine 
students  have  applied  the  RSM  variant  in  their  theses.  To  highlight  the 
use  of  Smith's  RSM  variant,  the  following  paragraphs  briefly  explain  the 
purpose,  the  deterministic  model  used,  and  how  the  use  of  Smith's  R8M 
variant  Improved  informational  analysis  for  each  of  the  former  AFIT 
theses.  The  theses  are  recounted  in  chronological  order. 

Cooke  was  the  first  to  use  Smith's  RSH  variant  (4).  His  objective 
was  to  develop  a  goal  programming  approach  which  would  ”...  optimize 
combat  power  delivered  to  a  theater  during  a  specified  time,  within 
acceptable  levels  of  force  sustainability*  (4:vlli,4).  Part  of  the  goal 
programming  approach  was  for  Cooke  to  develop  his  own  deterministic 
model  to  give  ”...  a  multi -objective  optimization  which  addresses 
Intertheater  movement,  intratheater  movement,  and  deployable  unit  capa¬ 
bilities”  (4:1).  The  other  part  of  the  goal  programing  approach  was 
the  use  of  the  RSM  variant  to  enable  full  parametric  informational 
analysis  (4:vlll).  Cooke  praised  the  RSH  variant  in  his  conclusions: 


...  It  has  been  demonstrated  that  a  flexible  response 
surface  methodology  can  result  in  a  reduction  of  a  fully 
computerized  and  intricate  large  scale  model  to  an  equation 
which  can  be  programed  on  a  hand-held  calculator,  and  with 
which  major  force  design  concepts  may  be  rapidly  searched, 
with  minimal  probable  error.  (4:130) 

Next,  Graney  applied  Smith's  RSM  variant  to  an  aggregated  strategic 
nuclear  exchange  model  with  a  non -commensurate,  two-objective  problem 
(11).  His  problem  was  to  show  the  optimal  trade-offs  between  the 
responses  to  the  two  objectives  over  their  entire  operating  domain 
(ll:vii).  The  objectives  were  to  maximize  the  damage  expectancy  for 
both  counter-force  and  counter -value  targets.  Graney  also  reported  the 
advantages  of  increased  informational  analysis  from  using  Smith's  RSM 
var iant : 

The  methodology's  advantage  over  other  multicriteria  decision 
theories  is  its  ability  to  consider  large  numbers  of 
alternatives,  show  the  MOB's  comparisons  throughout  the  range 
of  alternatives,  and  use  non-commensurate  measures  of 
effectiveness.  (11:79) 

Manacapilll  used  Smith's  RSM  variant  for  the  purpose  of  ".  .  .the 
identification  of  cost  effective  strategic  force  mixes"  (lS:vll).  Por 
his  work,  Manacapilll  used  an  arsenal  exchange  model  as  his  deter¬ 
ministic  model.  Manacapilll  postulated  that  an  economic  production 
function  could  capture  the  output  of  the  deterministic  model  and, 
coupled  with  Smith's  RSM  variant.  Increase  informational  analysis: 

.  .  .  economic  production  functions  can  be  easily  fitted  to 
the  response  surface  of  a  deterministic  model  and  that  the 
information  gained  from  the  fitting  of  these  economic 
production  functions  can  provide  insight  into  the  production 
process  that  will  be  useful  to  a  decision  maker.  (18:6.4) 

Meitzler  applied  Smith's  RSM  variant  to  APALC's  Budget/Readiness 
Analysis  Technique  (BRAT)  model  (19).  BRAT  is  a  deterministic  simu¬ 
lation  model  that  converts  levels  of  logistic  resources  into  a  sortie 
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cate  (19:vli).  Even  though  BRAT  is  relatively  quick  to  operate,  no 
informational  analysis  had  been  applied  to  it,  so  Meitzler's  problem  was 
to  extract  informational  analysis  from  the  BRAT  (19:22).  Therefore,  the 
purpose  of  Meitzler's  thesis  was  to  Improve  BRAT's  ability  for  ".  .  . 
efficient  multi-dimensional  sensitivity  (informational!  analysis" 
(19:vil).  Meitzler  concluded  that  the  fitted  response  equation  .  . 
provides  an  approximate  answer  to  a  'what-lf  question  without  using  the 
time  and  computer  resources  necessary  to  rerun  BRAT"  (19:103). 

Sparrow  applied  RSM  in  a  more  classical  approach  to  explicitly 
express  the  relationships  between  the  input  and  output  factors  of  a 
simulation  program  (28).  The  purpose  of  her  thesis  was  to  facilitate 
the  use  of  sensitivity  (Informational)  analysis  between  the  input  and 
output  factors  of  a  simulation  model  (There  has  been  some  work  in 
applying  RSM  to  stochastic  models,  such  as  simulation  models,  for 
several  years  but  specifically  to  optimize  simulation  output  rather  than 
to  fully  describe  the  surface).  Sparrow's  method  was  to  automate  RSM  as 
a  user-friendly  computer  package  that  could  be  attached  to  any  Fortran 
based  simulation  model  (28:4).  The  usefulness  of  Sparrow's  application 
was  that  it  revealed  the  relative  Importance  of  the  simulation  model's 
input  factors  to  its  output  and  illuminated  the  interdependence  between 
pertinent  factors  within  the  simulation  model  (28:3). 

Libby's  thesis  dealt  with  determining  "...  the  cost  of  with¬ 
holding  iCBMs  from  launch  until  after  detonation  of  Soviet  missiles, 
even  if  there  is  warning  of  an  attack"  (17:1-13).  Libby's  analysis  was 
threefold: 

First,  a  relative  measure  of  military  effectiveness  and  cost 
for  the  current  US  ICBM  force  will  be  determined  as  a  base¬ 
line  case.  Force  modernization  options  are  then  investigated 


for  their  contributions  to  effectiveness  and  costs,  second, 
the  trade-offs  between  Modernizing  the  force  structure  with 
new  weapon  systems  and  a  launch  before  impact  policy  are 
studied.  At  this  point,  a  Method  for  coMputing  the  cost  of 
withholding  a  Missile  that  is  under  attack  is  presented  and 
saMple  calculations  are  Made.  Third,  a  discussion  of  the 
uncertainties  and  risks  of  a  launch  before  lMpact  policy,  in 
light  of  the  cost  savings  Incurred,  conclude  the  analysis. 

(17:1-15) 

Just  like  Graney  and  Manacapilll,  Libby  also  used  an  arsenal  exchange 
Model  as  his  deterMlnistic  Model.  Also,  as  Graney  and  Hanacapllli 
ascertained,  Libby  discovered  how  useful  Smith's  rsm  variant  is  for 
inforMatlonal  analysis: 

The  use  of  response  surface  Methodology  in  conjunction  with 
deterMlnistic  Models  (SMith's  RSM  variant)  is  the  key  to 
analysis  of  a  launch  before  lMpact.  Without  it,  the 
conventional  approach  of  Making  a  Halted  number  of  runs  on  an 
arsenal  exchange  Model  would  not  provide  such  a  detailed 
description  of  US  ICBM  effectiveness.  Indeed,  the  Methodology 
condenses  the  results  of  specifically  defined  experiMents  into 
one  equation  which  can  be  Manipulated  as  desired.  (17:7-1) 

Johnson  also  applied  Smith's  RSM  variant  to  an  arsenal  exchange 
Model  (15).  Johnson  used  a  deterministic  model  called  the  Allot 
computer  program:  a  linear  programming  based  arsenal  allocation  model 
used  by  SAC  analysts  (15:vl,72).  The  purpose  for  Johnson's  thesis  was 
to  develop  a  substitute  model,  in  equation  form,  for  the  arsenal 
exchange  model  that  Insured  accurate  predictability  and  Increased  infor¬ 
mational  analysis: 

...  to  capture  the  output  of  this  nuclear  exchange  model 
(ALLOT)  into  a  single  equation  which  provides  the  relative 
contributions  to  the  overall  method  of  effectiveness  of  any  of 
the  factors  chosen  and  permits  efficient  multi -dimensional 
impact  analysis  of  the  selected  model  parameters.  (15:vl) 

Johnson's  results,  as  favorable  as  previous  results  on  the  use  of 

Smith's  RSM  variant,  promised  Increased  awareness  of  force  structure  and 

employment  concerns: 


This  capability  (smith's  applied  R8M  variant!  will  allow 
analysts  to  investigate  the  nature  of  this  Model  and  explore 
the  response  surfaces  generated  In  force  structure  analyses. 

The  Model  (with  the  RSM  lnproveMentl  should  provide  a  new 
diMension  of  insight  into  force  structure  and  force  eaployMent 
issues  and  allow  analysts  to  answer  questions  concerning  the 
relative  iaportance  as  well  as  the  interaction  of  the 
paraMeters  in  the  probleMS  that  are  being  Modeled.  (15:73) 

Donovan  applied  SMlth's  RSM  variant  to  a  Macroecononetrlc  deter- 
Ministic  Model  (9).  The  purpose  for  Donovan's  thesis  was  V  .  .to 
apply  response  surface  Methodology  (SMlth's  RSM  variant  1  to  a  macro- 
econoMetric  Model  to  facilitate  better  analysis  with  the  Model" 
(9:vlli).  From  the  response  surfaces  that  represent  the  output  to  the 
MacroeconoMetric  Model,  Donovan  derived  Multipliers  ".  .  .to  charac¬ 
terize  the  static  and  dynanlc  properties  of  econoMetric  Models  and  to 
conduct  policy  slMulations"  (9:88).  As  with  previous  theses,  Donovan 
also  had  success  with  SMlth's  RSM  variant: 

The  advantage  of  response  surface  derived  Multipliers  over 
Multipliers  derived  by  Model  linearization  is  that  the  Model 
does  not  have  to  be  linear  or  near  linear  for  Multipliers  to 
be  valid  over  a  wide  range  of  variable  values.  In  addition, 
significant  interactions  and  higher  order  effects  can  be 
identified.  The  advantage  of  response  surface  Multipliers 
over  control -disturbed  Multipliers  is  that  they  More 
coMpletely  characterize  the  relationships  in  the  Model  and 
reduce  the  nuMber  of  runs  required  to  estiMate  Multipliers. 

(9:88) 

Finally,  Ishihara  investigated  the  possibility  of  lnproving  SMlth' 
RSM  variant  (14).  Ishihara's  problen  was  to  coapare  experlMental 
designs  for  efficiency  (14:1-8).  The  experlMental  designs  were  of  two 
types:  bias  Mlnlulzing  and  variance  ninlMlzlng  designs.  Bias  nlnl- 
Mizing  designs  try  to  MlnlMlze  the  error  between  the  postulated  surface 
and  the  actual  surface  over  a  region  while  the  variance  MlniMlzlng 
designs  try  to  MlnlMlze  error  due  to  sampling  (14:1-2).  Because  deter- 
alnistlc  Models  have  no  saapllng  error,  only  bias  Mlnlnlzing  designs. 


not  variance  minimizing  designs,  would  be  used  with  Smith's  R8M  variant. 
However,  according  to  Ishlhara,  *.  .  .  Hanacapllll  (18]  showed  that  a 
bias  minimizing  design  required  more  design  points  than  a  variance 
minimizing  design  while  gaining  only  a  small  Improvement  In  the  fit  of 
the  postulated  surface*  (14:1-8).  Ishlhara  used  a  deterministic  nuclear 
exchange  linear  programming  model  to  show  that  "...  there  were  no 
significant  differences  between  the  two  types  of  experimental  designs, 
provided  that  the  designs  maintained  certain  characteristics,  such  as, 
rotatablllty  and  orthogonality*  (14:4-4).  (The  terms  "rotatablllty”  and 
*orthogonality"  are  explained  later  in  this  chapter.)  However,  Ishlhara 
also  reported  that: 

.  .  .  more  design  points  improves  accuracy,  provided  the 
points  are  spread  throughout  the  entire  surface.  Similarly, 

If  the  region  of  Interest  is  spherical,  a  rotatable  design 
Improves  the  accuracy  of  the  response  equation.  (14:4-2) 

Therefore,  even  though  no  significant  differences  were  found  between 

bias  and  variance  minimizing  designs,  the  effectiveness  of  a  response 

equation  may  depend  on  which  experimental  design  requires  more  design 

points  (14:4-2). 

Previous  Work  SMMLLX..  The  preceding  account  of  theses  that  have 
applied  Smith's  RSM  variant  have  all  reported  the  usefulness  of  the  RSH 
variant  to  Informational  analysis.  First,  time,  an  important  factor  for 
any  analyst  when  performing  Informational  analysis,  was  decreased 
because  extra  runs  of  the  deterministic/stochastic  model,  due  to  conven¬ 
tional  methods  of  Informational  analysis  (vary  one  parameter  at  a  time 
syndrome),  were  not  necessary.  Second,  by  using  the  RSM  variant  as 
opposed  to  conventional  informational  analysis  methods,  much  more  Infor¬ 
mation  was  generated:  the  relative  worth  of  each  factor,  the  contrl- 


bution  to  the  response  per  a  unit  of  each  factor,  etc.  (27:63).  (These 
two  advantages  are  demonstrated  in  Chapters  Pour  and  Pive.) 

The  previous  theses  also  proved  that  arsenal  exchange  models  could 
be  used  as  the  deterministic  model  in  the  RSH  variant.  Of  the  nine 
theses,  five  of  them  used  an  arsenal  exchange  model  as  their  determi¬ 
nistic  model.  And,  of  those  five,  Johnson's  work  is  most  closely 
related  to  the  effort  put  forth  in  this  thesis.  But,  it  is  the  combined 
success  of  these  prior  theses  with  arsenal  exchange  models  that  provides 
a  basis  for  applying  the  RSH  variant  to  the  ABH. 

Afif 

As  defined  in  Chapter  One,  the  ABM  is  a  linear,  goal-programming, 
weapon-to-target  optimal  allocation  model  (S).  Furthermore,  "The  ABM  is 
an  aggregated,  two-sided  strategic  exchange  model  with  a  diverse  set  of 
scenarios  and  analyst  controls"  (6:2). 

The  Martin  Marietta  corporation  originally  developed  the  ABM  in 
1965  to  help  understand  the  TITAN  weapon  system  (6:2).  However,  since 
its  conception,  the  ABM  ”...  has  developed  into  a  general  purpose 
force  analysis  model”  (6:2).  Today,  the  ABM  ”.  .  .  has  become  one  of 
the  most  widely  used  strategic  force  analysis  models  in  the  defense 
community"  (6:2). 

The  ABM  is  used  for  many  diverse  types  of  strategic  force  analysis 
problems:  strategic  weapon  system  analysis,  strategic  nuclear  policy 
support,  arms  control,  force  management,  intelligence  support,  and/or 
general  strategic  calculations  (6:2).  For  any  type  of  problem,  "The  ABM 
performs  optimal  allocations  for  either  side  in  a  scenario  and  evaluates 
damage  attained  by  the  allocations"  (6:2). 
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The  abm  uses  the  dual  variables  that  are  always  associated  with 
linear  programing  to  solve  problem  (6:22).  The  dual  variables,  or 
aatheaatlcally,  the  laabdas,  allow  the  ABM  to  decompose  its  problem 
into  a  sequence  of  saaller,  aore  manageable  linear  program  (6:22). 

This  decoaposltlon  decreases  the  solution  tlm  and  produces  the  sam 
results  as  would  have  been  produced  if  the  problea  had  been  solved  as  a 
single,  gigantic  linear  programing  problea  (6:22).  (Mote:  It  is  beyond 
the  scope  of  this  thesis  to  explain  duality  theory.  The  dual  variables 
are  only  aentioned  to  inf ora  the  reader  about  the  process  that  ABM  uses 
to  solve  its  problem.  More  indepth  inforaation  on  duality  theory  can 
be  obtained  in  Chapter  Three  of  Hllller  and  Lleberaan,  Chapter  Bight  of 
lgnlzio,  and/or  Chapter  Four  of  Ifu  and  Coppins  ( 12 ; 13; 30 ) . ) 

Input  to  the  ABM  is  very  flexible.  The  ABM  allows  for  aultlple- 
objectlve  type  problem  to  be  Inserted  as  goals.  The  goals  are  solved 
preferentially  according  to  user-defined  priorities.  Scenario-type 
input  is  aalnly  in  the  fora  of  weapons  and  targets.  The  ABM  receives 
weapon  and  target  inputs  ranging  froa  the  nuaber  of  weapons  and  targets 
available  to  weapon  and  target  systea  characteristics  (l.e.,  weapon 
reliability  and  target  hardness).  Constraints  are  received  in  the  fora 
of  weapon-to-target  allocation  rules  and  strategies  and  Inforaation 
uncertainties.  ABM's  characteristic  of  flexible  input  is  a  proainent 
reason  why  the  ABM  is  a  widely  used  strategic  force  analysis  tool. 

The  ABM  has  the  capability  of  producing  vast  output.  But,  the 
aaount  of  output  generally  depends  on  what  type  of  problea  the  ABM  ?s 
solving.  Predoalnately,  though,  the  optlaal  weapon-to-target  alloca¬ 
tions  and  the  ABM  response  (daaage  expectancy)  to  any  or  all  objectives 
are  alaost  always  desired. 


One  of  the  quickest  ways  to  learn  the  ASH  is  to  apply  its  user's 
Manual  to  specific  problems.  The  ABM's  users'  Manual  has  been  updated 
to  reflect  the  1985  revision  to  the  ABM  (6).  To  help  understand  the  ABM 
algorithm,  texts  on  linear/goal  programming  by  Hillier  and  LieberMan, 
Ignizio,  and  Vu  and  coppins  provide  excellent  starts  (12; 13; 30). 

■MMMft  IHlilCft  Methodology 

The  Methodology  of  SMith's  RSM  variant  is  to  fit  a  response  surface 

to  the  output  of  a  deterministic  Model.  Intrinsic  to  SMith's  RSM 

variant  and  classical  RSM  are  experinental  design  techniques  and 

regression  analysis.  BxperiMental  design  techniques  explain  hov  to 

collect  data  froM  a  Model,  deterministic  or  stochastic,  while  regression 

analysis  uses  the  collected  data  to  fit  and/or  allow  Inferences  to  be 

Made  about  the  postulated  Model.  More  on  RSM  can  be  found  in  Box  and 

Oraper,  Montgomery,  or  Myers  (3;20;21):  Box  and  Draper  have  recently 

coMbined  their  efforts  to  produce  a  book  with  somc  excellent  chapters  on 

the  conponents  of  RSM;  MontgoMery  devotes  one  chapter  to  the  purpose  and 

use  of  RSM;  and  Myer's  text  is  the  only  text  devoted  entirely  to  RSM. 

motion*.  There  are  a  few  assumptions  upon  which  RSM  is  based. 

Myer's  text  has  concisely  listed  these  assumptions: 

1.  A  structure  ksf(Xt,Xa,...,Xt.)  exists  and  is  either  very 
complicated  or  unknown.  The  variables  Involved  are 
quantitative  and  continuous. 

|  2.  The  function  f  can  be  approximated  in  the  region  of 

Interest  by  a  low-order  polynomial  .... 
i  3.  The  Independent  variables  X»,Xa, . . . ,X„  are  controlled  in 

I  the  observational  process  and  Measured  with  negligible 

error.  (21:62) 

Probably  the  crux  of  RSM  is  the  assumption  that 


the  structure  of  the  output  for  the  deterministic  or  stochastic  model 
can  be  postulated  by  a  low-order  polynomial  equation.  The  output  of  any 


aodel  can  b«  viewed  as  a  k+1  dlaensional  surface  if  all  responses  to 
Increnent  variations  In  the  Input  variables  were  gathered  and  plotted  In 
k+l  space  (k  Is  the  nuaber  of  Input  variables).  Polynoalal  equations 
can  usually  be  thought  of  and  soaetlaes  pictured  as  a  surface.  In  three 
dlaenslons,  especially  If  enough  of  the  output  Is  collected  and  plotted, 
a  surface  (response  surface)  would  be  visible  and  this  surface  would  be 
aatheaatlcally  explained  by  the  polynoalal  equation. 

The  aost  coaaon  type  of  low-order  polynoalal  equations  are  those  of 
either  first  or  second  order.  These  two  types  of  equations  can  be  found 
In  alaost  any  statistical  reference  book: 

fa  fafa 

=  Jo  4  E  liXi  4  EE  ItjXiXj  4  Ci«  (2.1) 
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where 

k  represents  the  nuaber  of  independent  input  variables. 

1  =  1,  2,  3,  .  .  .  ,  M  where  M  represents  the  total 
nuaber  of  observations  (responses  froa  the  aodel). 

a  »  1,  2,  3,  .  .  .  ,  n  where  n  represents  the  total 
nuaber  of  replications  at  an  observation. 

Bquatlon  2.1  is  a  first-order  polynoalal  equation  while  equation  2.2  is 

a  second-order  one.  Por  both  equations,  the  response  tern  is  the 

variable  located  on  the  left  side.  The  first  tern  on  the  right  side  of 

both  equations  is  the  intercept.  To  the  right  of  both  intercepts  are 

the  linear  terns.  They  are  shown  grouped  together  by  a  suaaatlon 

syabol.  Linear  teras  represent  the  aaln  effects  of  the  equation. 

following  both  sets  of  linear  teras  is  the  suaaatlon  of  cross  teras 

representing  the  cross  effects  of  the  equation.  (The  first-order 


equation  (2.1)  need  not  contain  the  cross  terms  If  the  user  doesn't 
believe  interaction  exists.)  For  equation  2.2  only,  the  last  set  of 
terms  is  the  suMation  of  second-order  terms,  each  represent ing  a  pure 
quadratic  effect  for  the  second-order  polynomial  equation.  The  last 
term  for  each  equation  is  the  error  term  associated  with  each  response. 
The  error  term  is  a  very  Influential  part  of  the  equation  for  it  can 
control  the  experimental  desiqn  selection,  and/or  it  can  be  used  to 
judge  the  fit  of  the  polynomial  equation. 

Invariably,  when  choosing  an  alternate  model  to  postulate  the  real 
model,  of  high  Importance  is  the  need  to  obtain  as  much  Information  as 
possible  from  that  postulated  model.  Not  only  should  the  postulated 
model  accurately  predict  the  real  model,  but  it  should  also  contribute 
additional  information  through  Informational  analysis.  Therefore,  the 
choice  for  the  postulated  model  is  Important  because  not  all  postulated 
models  are  amenable  to  informational  analysis.  The  polynomial  equations 
of  2.1  and  2.2,  though,  are  excellent  choices  for  postulated  models 
because  they  are  very  conducive  to  informational  analysis  provided  they 
are  constructed  with  experimental  designs  that  Insure  rotatablllty  and 
orthogonality  between  the  model's  terms  (refer  to  the  Experimental 
Designs  subsection  of  this  chapter). 

Equation  2.1  or  2.2  is  called  the  "postulated*  model  when  either  is 
used  to  represent  the  output  of  some  "real"  model.  The  choice  of  which 
equation  to  use  is  dependent  upon  the  user's  understanding  of  the  real 
model  and/or  the  eventual  use  of  the  postulated  model.  But,  once  an 
equation  is  picked  as  the  postulated  model,  the  coefficients  of  that 
model  will  need  to  be  estimated.  The  first  step  towards  estimating  the 
coefficients  is  the  selection  of  an  experimental  design. 
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ImlMtil  P**i9**.  The  estination  of  the  postulated  model's 
coefficients  is  actually  done  through  multiple  regression,  which  is 
explained  later  in  this  chapter.  However,  Multiple  regression  requires 
data,  and  this  data  has  to  be  obtained  fro*  the  real  Model.  But,  how 
Much  data  is  enough;  what  should  the  values  of  the  Model  inputs  be;  and 
how  Many  replications,  if  any,  should  there  be? 

Bxperlnental  designs  were  developed  to  answer  those  questions  and 
to  fulfill  other  purposes.  Bxperluental  designs  explain  how  Much  and 
froM  which  Model  variables  data  should  be  collected.  In  doing  so, 
though,  experlMental  designs  also  fulfill  another  function:  results  and 
conclusions  drawn  froM  International  analysis  are  correct  and  valid 
(20:2).  So,  experinental  designs  not  only  explain  how  Much  data  to 
collect,  but  they  also  insure  the  collection  is  correctly  acconpllshed 
so  that  any  analysis  of  the  fitted  Model  will  give  valid  and  objective 
results  (20:1-4). 

By  explaining  "how”  the  data  should  be  collected,  the  experinental 
design  Is  actually  nlnlnlzing  the  expected  nean  square  error  averaged 
over  the  response  surface  (2:622).  Brror  naturally  occurs  as  a  result 
of  using  the  postulated  Model,  but,  error  can  also  occur  fron  the  postu¬ 
lated  Model's  fornulation  (2:622).  The  first  type  of  error,  called  bias 
error,  occurs  when  a  postulated  node!  is  used  in  place  of  the  actual 
Model.  Variance  error,  the  second  type  of  error,  can  occur  fron  the 
data  that  is  collected  to  estlnate  the  coefficients  of  the  postulated 
Model.  An  experinental  design  attenpts  to  collect  data  fron  the  real 
Model  so  as  to  nininlze  the  Magnitude  of  the  error  terns. 

Por  equations  2.1  and  2.2,  error  is  accounted  for  in  the  error 
terns  associated  with  each  response,  l.e.,  ti>.  Por  any  input,  this 
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error  ter*  Is  the  difference  between  the  real  response  (h)  and  the 
postulated  response  (Y).  And,  It  Is  this  error  term  that  contains  the 
two  components  of  error:  variance  and  bias.  The  variance  error  occurs 
from  sampling  the  same  data  point,  i.e.,  the  different  responses  that 
occur  from  the  same  set  of  model  input.  The  bias  error  appears  when  the 
postulated  model's  surface  is  not  an  exact  copy  of  the  real  model's 
surface,  i.e.,  the  error  between  the  postulated  and  real  response 
surface.  So,  an  experimental  design's  objective,  when  explaining  how  to 
collect  data  from  the  actual  model  for  the  purpose  of  estimating  the 
postulated  model  (equation  2.1  or  2.2),  is  the  minimization  of  the 
expected  mean  square  of  the  error  term  associated  with  the  postulated 
model,  i.e.,  the  £i«. 

There  are  many  types  of  experimental  designs.  They  are  labelled  by 
their  purpose,  use,  and  characteristics.  Since  error  is  composed  of 
bias  and/or  variance,  experimental  designs  are  classified  according  to 
the  type  of  error  they  minimize:  bias-minimizing  designs,  variance- 
minimizing  designs,  and  designs  that  try  to  minimize  both  types  of  error 
for  any  type  of  model  (29).  Bxperlmental  designs  are  also  grouped  by 
their  use,  i.e.,  the  type  of  experiment  or  situation  they  are  used  for. 
Last,  experimental  designs  are  also  classified  with  respect  to  their 
characteristics  such  as  efficiency,  orthogonality,  and  rotatabllity. 

Variance-minimizing  designs  are  usually  appropriate  when  the  user 
believes  that  there  is  more  variance  error  than  bias  error.  Conversely, 
bias-minimizing  designs  would  probably  be  appropriate  if  the  user 
believes  that  there  is  more  bias  than  variance  error  or  if  the  model  is 
deterministic  (no  variance  error).  However,  Ishlhara  points  out  that 
these  assumptions  alone  might  not  suffice  for  design  selection  (14). 


Experimental  designs  have  very  vide  and  diverse  usage.  They  are 
employed  with  agriculture,  chemistry,  advertising  and  sales,  social 
statistics,  and  in  many  other  areas.  The  aodel  can  be  stochastic  or 
deterministic  and  the  data  can  be  empirical  or  computer  generated.  The 
use  for  experimental  designs  are  limitless. 

The  characteristics  of  a  design  can  be  crucial  to  the  design 
selection.  Of  the  characteristics  noted  above  (efficiency,  orthogo¬ 
nality,  rotatablllty),  design  efficiency  might  be  the  most  decisive 
characteristic  because  resource  availability  constricts  the  entire 
experiment.  For  Instance,  If  computer  time  Is  very  expensive  or  almost 
nonexistent,  the  design  efficiency  for  this  example  (required  number  of 
computer  runs)  would  probably  be  the  determining  factor  for  design 
selection.  Another  resource  availability  example  might  be  the  abundance 
of  proper  weather  and/or  land  for  an  agricultural  experiment.  Likewise, 
for  a  chemical  experiment,  the  amount  of  chemicals  and  their  costs  when 
required  for  a  chemical  experiment  would  be  important  in  selecting  a 
design.  Resources  become  scarce,  either  naturally  or  otherwise,  there¬ 
fore  the  ability  of  a  design  to  make  the  most  of  what  Is  available 
(efficiency)  can  be  the  most  important  criteria  for  design  selection. 

Besides  efficiency,  there  are  two  other  Important  design  charac¬ 
teristics:  orthogonality  and  rotatablllty.  These  characteristics 
pertain  to  how  easy  Information  Is  obtained,  through  informational 
analysis,  from  the  postulated  model,  and  to  how  reliable  the  information 
Is  when  extracted  anywhere  over  the  range  of  the  problem. 

Orthogonality  is  the  property  that  ensures  the  data  collected  by 
the  experimental  design  will  lead  to  independent  factors  for  the 
response  equation  (7:567).  The  independence  of  the  factors  will  allow 


information  to  be  obtained  more  easily  through  Informational  analysis. 
Chapter  Pive  shows  soae  of  the  Informational  analysis  results  taken 
directly  from  the  response  equations  containing  Independent  terms. 


Orthogonality  can  be  accomplished  by  "coding"  the  real  model's 
Input.  The  actual  input  Is  scaled  to  numbers  that  satisfy  the  mathe¬ 
matical  requirement  for  orthogonality  (independency  between  all  coIumis 
of  the  design  matrix)  (3:20, 21;21:43, 166-174): 

Xi  >  (Xt  -  JL)  /  Bt  (2.3) 


where 


X!  is  the  coded  variable. 

Xt  is  the  actual  variable. 

A  is  the  midpoint  between  the  highest  and  lowest  value 
for  the  actual  variable. 

B  is  half  the  difference  between  the  highest  and  lowest 
value  of  the  actual  variable. 

1  *  1,  2,  3,  .  .  .  ,  k  where  k  represents  the  number 
of  Independent  input  variables. 

The  values  of  the  coded  variable  depend  on  the  postulated  model.  For 
example,  for  equation  2.1,  the  coded  values  will  be  +1  and  -1.  And,  for 
equation  2.2,  the  coded  values  will  be  +1,  0,  and  -1. 

The  rotatablllty  feature  occurs  when  ”...  the  variance  of  the 
predicted  response  (Y)  at  some  point  (X)  is  a  function  only  of  the 
distance  of  the  point  from  the  design  center,  and  not  a  function  of 
direction”  (20:365).  Rotatablllty  allows  the  user  to  be  justly 
confident  with  any  Information  drawn  from  the  postulated  model  because 
".  .  .  points  In  the  factor  space  which  are  the  same  distance  from  the 
origin  are  treated  as  being  equally  important"  (21:166).  Complete 
confidence  in  the  postulated  model,  along  with  the  ability  to  easily 
obtain  information  from  the  postulated  model,  makes  rotatablllty  and 
orthogonality  desirable  design  characteristics. 


Many  designs  are  available  for  Many  uses.  The  type  of  experiNent, 
the  resources  available,  and  the  user's  requirements  dictate  what  design 
is  chosen.  Additional  Information  on  experimental  designs  can  be  found 
in  texts  by  Box  and  Draper  and  by  Davies  (2;7).  A  good  summary  Is 
afforded  by  Steinberg's  article  which  reviews  the  principles  and  methods 
of  experimental  designs  (29).  However,  Montgomery  Is  highly  recommended 
because  he  expertly  shows  the  binding  relationship  between  experimental 
designs  and  statistical  analysis,  specifically,  multiple  regression 
(20). 

Multiple  Regression.  Multiple  regression  refers  to  regression 
analysis  applied  to  a  linear  equation  with  two  or  more  Independent 
variables  (22:226-263).  Regression  analysis  uses  the  method  of  least 
squares  ".  .  .to  examine  data  and  to  draw  meaningful  conclusions  about 
dependency  relationships  that  may  exist"  (10:4).  By  using  the  data 
collected  from  the  ABM  as  prescribed  by  the  experimental  design,  the 
method  of  least  squares  will  try  to  prove  that  the  relationship  as  shown 
by  equation  2.2  exists  between  the  ABM  weapons  and  the  ABM  response  of 
damage  expectancy. 

Multiple  regression  is  a  valuable  statistical  tool  for  making 
Inferences  about  the  postulated  model  (equation  2.2),  for  obtaining 
estimations  to  the  model's  coefficients,  and  for  aiding  in  model 
construction  and  validation.  However,  since  a  deterministic  model 
contains  no  variance  error,  many  multiple  regression  statistics  cannot 
be  used.  Therefore,  multiple  regression  is  not  reviewed  in  detail;  only 
the  method  of  least  squares  and  the  regression  statistics  used  In  auto¬ 
mating  R8M  with  the  ABM  Is  reported. 
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The  Min  use  for  Multiple  regression,  one  Most  relied  upon  by 
Smith's  RSH  variant,  is  the  parameter  coefficient  estlMtions  of  the 
postulated  response  surface  equation  (the  Is  in  equations  2.1  and  2.2). 
This  is  done  by  the  least  squares  Method  (22:238-239).  The  least 
squares  Method  MiniMlzes  the  sum  of  the  squares  of  the  deviations 
(statistically  called  residuals)  between  the  postulated  Model's  output 
and  the  true  Model's  output  (21:23).  The  sum  of  the  squares  of  the 
deviations  is  called  the  error  suM-of -squares  (SSB).  In  the  process  of 
coMputlng  the  SSB,  the  postulated  Model's  coefficients  are  estlMted. 

The  SSB  is  called  a  statistic  and  can  be  used,  along  with  other 
statistics,  to  Mke  Inferences  about  the  estlMted  postulated  Model. 
Again,  the  SSB  is  the  total  squared  difference  between  the  actual  Model 
(A)  and  the  postulated  Model  (Y)  with  respect  to  the  saMe  data  design 
points.  The  error  tern  in  equations  2.1  and  2.2  (gi.)  reflects  the 
difference  between  the  postulated  Model  and  the  real  Model  for  any 
design  point.  In  conputlng  the  SSB,  the  error  associated  with  each 
design  point  is  squared  and  sunned  with  all  other  errors  fron  all  other 
design  points  (N)  replicated  n  tines: 

SSB  -  t  t  -  Y.«)a  *  t  t  (gi.)*  (2.4) 

t>t  a-l  l-t  1 

The  lower  the  SSB  value,  the  better  the  postulated  nodel  fits  the  actual 
nodel  at  the  design  points.  Usually,  though,  the  value  of  the  SSB 
statistic  decreases  as  the  nunber  of  terns  In  the  postulated  nodel 
Increases.  Therefore,  it  is  advisable  to  evaluate  the  SSB  statistic 
with  regards  to  other  nodel  statistics  like  the  R*. 

The  Ra  statistic  allows  Inferences  to  be  Mde  about  the  postulated 
Model's  expla inability  of  the  real  surface.  This  is  done  in  percentile 
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values,  and  the  higher  the  value,  with  1.00  representing  a  perfect 
explalnablllty,  the  better  the  postulated  Model.  If  an  Ra  statistic  has 
a  high  value,  the  variables  of  the  postulated  Model  explain  a  large 
proportion  of  the  total  variation  about  the  Mean  response  (10:33).  If  a 
postulated  Model,  whose  coefficients  have  been  estlMated,  has  a  high  Ra 
value,  Much  confidence  can  be  placed  in  that  postulated  Model's  ability 
to  replace  the  actual  (real)  Model.  If  the  Ra  value  for  an  estlMated 
postulated  Model  Is  low,  the  postulated  Model  should  not  be  used  in  lieu 
of  the  true  Model. 

Like  the  SSB,  the  Ra  statistic  is  fallible.  The  value  of  the  Ra 
statistic  slightly  Increases  vith  each  addition  of  a  tern  to  the  postu¬ 
lated  Model.  So,  a  postulated  Model,  that  accurately  represents  the 
real  Model,  with  Many  terns  will  probably  have  a  high  Ra  value. 
Subsequently,  conclusions  ascertained  on  Model  adequacy  and/or  Model 
explalnablllty  should  so  be  done  by  evaluating  the  Ra  and  SSB  statistics 
together,  with  other  statistics,  such  as  residuals,  and  with  personal 
experience  of  the  problen. 

The  residual  Is  the  statistical  naMe  given  to  the  error  terM  of  the 
postulated  Model  (t).  A  residual  is  the  deviation  between  the  predicted 
(postulated)  Model's  output  and  the  real  Model's  output  for  the  saMe 
single  data  point.  The  fitting  of  the  predicted  Model  Is  done  with  a 
finite  set  of  data  design  points.  Bach  design  point  will  have  a 
residual. 

The  SSB  and  Ra  statistics  are  good  indicators  for  overall  Model 
adequacy  and  explalnablllty.  But,  a  Model  May  be  better  at  certain 
points  and  worse  at  others.  The  residuals  help  show  where  the 
postulated  Model  better  predicts  the  real  Model  and  where  It  doesn't. 


Residuals  ace  also  helpful  for  validating  the  postulated  aodel. 

Once  a  postulated  aodel  Is  estimated,  residuals  can  be  computed  froa  a 
set  of  randomly  chosen  data  points.  The  residual's  aean  and  standard 
deviation  froa  the  randoaly  chosen  data  points  will  help  In  assuring  the 
predictability  accuracy  of  the  estlaated  aodel. 

One  other  regression  statistic  is  used  for  aodel  construction:  the 
sua-of -squares  for  each  aodel  paraaeter.  The  paraaeter  sua-of-squares 
show  the  Individual  strength  of  each  aodel  paraaeter.  The  higher  the 
sua-of-squares  for  a  particular  paraaeter,  the  likelihood  that  paraaeter 
belongs  in  the  postulated  aodel.  Likewise,  the  lower  the  sua-of-squares 
for  a  particular  paraaeter,  the  likelihood  that  paraaeter  doesn't  belong 
with  the  postulated  aodel.  A  aodel 's  paraaeter  sua-of-squares  allows 
the  user  the  ability  to  delete  non-contributing  paraaeters,  and,  thus, 
reduce  a  full  estlaated  aodel  to  a  aore  manageable  reduced  fora. 

Multiple  regression  is  a  valuable  and  necessary  eleaent  of  the  RSM 
variant.  Multiple  regression  coapletes  the  fitting  of,  allows 
Inferences  to  be  aade  on,  and  helps  validate  the  postulated  aodel.  All 
of  this  is  done  through  the  least  squares  aethod.  Por  aore  information 
on  the  least  squares  aethod  along  with  explanations  on  the  aodel 
statistics,  refer  to  texts  by  Draper  and  Saith  or  Neter,  Vasseraan,  and 
Kutner  (10; 22). 

FBI  am  In  suMary,  the  real  response  U)  to  soae  experiment 
or  froa  the  output  of  some  aodel,  etc.,  depends  on  the  input  values  of 
certain  independent  variables  (X»,  Xa,  X*,  etc.).  By  applying  RSM  to 
the  experiment  or  aodel,  the  user  is  trying  to  capture  the  response  in  a 
surface  through  an  approximating  equation,  usually  a  low-order  poly¬ 
nomial  (21:61-66).  Por  this  thesis,  the  response  to  be  modelled  is  the 


output  from  the  ASM,  and  the  purpose  is  ASH  predictability  and  Increased 
informational  analysis.  The  latter  purpose  is  due  to  the  use  of  deter¬ 
ministic  models  and  certain  experimental  designs. 


In  practice,  a  response  surface  is  first  postulated,  and  then 
multiple  regression  is  used  to  develop  a  regression  equation  that 
"captures”  the  postulated  response  surface.  To  develop  input  for  esti¬ 
mating  regression  coefficients,  different  sets  of  AEM  veapon-to-target 
allocations  are  set  up,  and  the  data  generated  by  these  allocations 
(optimal  expected  target  damage)  are  collected.  An  experimental  design 
is  used  to  select  the  various  combinations  of  weapons  to  be  allocated  in 
order  to  build  the  response  surface.  So,  the  experimental  design  deter¬ 
mines  the  data  points  to  be  collected,  AEM  executions  produce  the  data, 
and  multiple  regression  uses  the  data  to  fit  the  postulated  response 
surface  equation. 

Conclusion 

A  definition  was  developed  on  the  term  "Smith's  RSH  variant". 
Smith's  RSM  variant  is  RSM  applied  to  a  deterministic  model,  mainly  for 
the  purpose  of  increased  informational  analysis.  Second,  former  thesis 
applications  of  Smith's  RSM  variant  were  concisely  listed.  The  AEM  was 
next  described  through  its  uses  and  characteristics.  Pourth,  the  compo¬ 
nents  or  RSM  were  explained  to  give  the  reader  a  working  knowledge  of 
RSM.  Finally,  to  orient  the  reader,  the  applicability  of  RSM  to  the  AEM 
was  shown  throughout  the  chapter.  The  next  chapter  shows  how  the  RSM 
variant  is  incorporated  in  the  methodology  used  to  solve  the  research 
problem  defined  in  Chapter  One. 


Introduction 


This  chapter  describes  the  Methodology  and  then  the  computer  soft¬ 
ware  tools  that  automate  Sulth's  RSM  variant  with  the  ABM.  The  Metho¬ 
dology  is  described  in  the  step-by-step  sequence  a  user  should  use  when 
applying  the  autoMated  Sulth's  RSM  variant  to  an  ABM  problen. 

MtttAQdttlMQC 

ABM  Setup.  The  first  step  of  the  Methodology  is  for  a  user  to 
understand  what  is  to  be  Modelled:  what  ABM  Inputs  are  of  Interest,  and 
over  what  range  are  they  of  Interest?  (ReMeMber  that  ABM  inputs  include 
weapons  and/or  their  characteristics,  such  as  probability  of  arrival, 
circular  error  probable,  etc.)  The  answer  to  those  two  questions  are 
vital  since  the  entire  Methodology  is  an  outgrowth  of  fitting  the  postu¬ 
lated  equation  around  the  ABM  Inputs.  Therefore,  a  user  should  first 
pick  the  ABM  Inputs  (the  variables  of  Interest),  Including  their  range 
of  values,  and,  then,  set  up  the  ABM  weapon-to-target  allocation  rules 
and  constraints  (targeting  strategies  and  priorities).  The  ABM  Inputs 
becoMe  the  variables  in  the  postulated  Model. 

Modal  Postulation.  The  second  step  is  to  postulate  a  Model  that 
will  "capture”  the  response  of  the  ABM.  Restating  the  RSM  assuaptlons 
(listed  in  Chapter  Two)  with  the  ABM,  the  output  froM  the  ABM  (daMage 
expectancy)  has  soMe  "true"  structure  (U  that  can  be  "approxlMated”  by 
a  low-order  polynoMial  (Y)  whose  Independent  variables  (X»,  Xa,  .  .  .  , 
Xx )  are  the  ABM  Inputs  (nuMber  of  weapons,  probability  nunbers,  weapon 
accuracy  nunbers). 


Foe  the  ASM  problem,  It  Is  assumed  that  each  of  the  problem's  five 
objectives  (listed  in  Chapter  One)  can  be  approxiaated  by  a  second-order 
polynoalal  equation  (equation  2.2).  The  assuaption  is  based  upon 
previous  successful  applications  of  Smith's  RSM  variant  to  other  arsenal 
exchange  models  (11;14;15;17;18) .  Thus,  equation  2.2  becomes  the  postu¬ 
lated  model  for  each  objective  of  the  ASH  problem.  The  response 
(measure  of  effectiveness)  for  each  of  the  five  objectives  Is  damage 
expectancy,  and  each  objective's  goal  is  to  maximize  the  response. 

The  Bxpcr 1 mental  Design.  After  postulating  a  model  to  represent 
the  ABM  response  surface,  the  next  step  is  to  pick  an  experimental 
design.  To  recapitulate,  an  experimental  design  explains  hov  to  collect 
data  from  the  ABM  for  the  purpose  of  "fitting"  the  response  equation. 
Since  the  ABM  is  a  deterministic  model,  there  is  no  variance  error  due 
to  sampling.  Therefore,  the  only  error  component  that  needs  to  be 
minimized  is  bias.  A  bias-minimizing  design  would  probably  be  chosen, 
but  because  of  Ishihara's  work  (highlighted  in  Chapter  Two),  variance- 
minimizing  designs  will  be  used  instead  (14). 

Many  variance-minimizing  designs  are  available  for  second-order 
equations  but,  for  this  thesis,  only  one  type  is  used  with  the  ABM: 
Box-Behnken  designs  (Appendix  A).  Box-Behnken  designs  are  picked  over 
other  designs,  such  as  Central  Composite  or  factorial  designs,  because 
they  are  much  more  efficient  (less  ABM  executions  needed),  especially 
when  the  number  of  design  variables  become  large.  Another  major  deter¬ 
mining  factor  for  choosing  Box-Behnken  designs  is  that  they  are  proven. 
As  described  in  Chapter  Two,  Box-Behnken  designs  have  successfully  been 
used  with  other  arsenal  exchange  models.  Thus,  efficiency  and  their 
proven  nature  are  the  chief  reasons  for  selecting  Box-Behnken  designs. 


The  Box-Behnken  designs  also  have  the  desirable  properties  of 
rotatablllty  and  orthogonal lty,  at  least  they  are  nearly  orthogonal. 
Because  the  intercept  tera  is  correlated  with  the  pure  quadratic  teras 
which  are  correlated  with  each  other,  the  Box-Behnken  designs  are  not 
coapletely  orthogonal.  However,  orthogonality,  and,  thus,  tera  indepen¬ 
dency,  is  preserved  within  the  aain  effects,  cross  effects,  and  between 
the  two.  Therefore,  for  lnforaational  analysis,  Box-Behnken  designs  are 
very  productive.  The  Box-Behnken  designs  are  shown  in  Appendix  A,  and 
an  article  by  Box  and  Behnken  explains  their  construction  (1). 

As  Appendix  A  explains,  Box-Behnken  designs  are  available  for  three 
to  sixteen  variables  inclusive,  but  are  not  coaplete:  there  axe  no  Box- 
Behnken  designs  for  eight,  thirteen,  fourteen,  or  fifteen  variables.  To 
overcoae  this  problea,  three  solutions  exist:  coabine  slailar  vari¬ 
ables,  use  duaay  variables,  or  apply  ABM  variable  controls.  The  first 
solution  coablnes  variables  of  slailar  characteristics.  For  exaaple, 
two  ICBMs  are  very  slailar  In  every  feature  except  naae.  If  the  ABM 
problea  contains  thirteen  variables  of  Interest  for  which  no  Box-Behnken 
design  exists,  those  two  ICBMs  can  be  coabined  to  bring  the  variables 
down  to  twelve.  A  Box-Behnken  design  exists  for  twelve  variables.  This 
solution  Is  recoaaended  If  coaputer  tlae  Is  not  abundant,  or  If  "tlae  to 
coaplete  the  project"  is  short.  However,  the  coabined  variables 
solution  Is  not  recoaaended  If  lnforaational  analysis  Is  highly  desir¬ 
able  for  each  of  the  coabined  teras  separately,  because  any  lnforaation 
gathered  froa  lnforaational  analysis  applies  to  both  variables  equally 
since  they  are  coabined. 

The  second  solution  involves  Inserting  duaay  varlable(s)  in  the  ABM 
setup  and,  subsequently,  in  the  postulated  aodel.  A  larger  design  is 


required,  though,  and,  thus,  more  aem  executions  on  the  computer.  But, 
If  Informational  analysis  Is  desirable  for  all  variables,  the  second 
solution  is  recoaaended. 

The  two  previously  discussed  variable-reduction  techniques  are 
mutually  exclusive.  However,  the  third  variable-reduction  technique, 

ASH  control  variables,  can  be  used  with  either.  The  ASH  control  vari¬ 
ables  technique  uses  a  postulated  variable  (design  variable)  to  control 
aore  than  one  ASH  variable  of  interest.  For  example,  a  bomber  can  carry 
two  types  of  bombs.  Instead  of  using  two  design  variables,  one  for  each 
bomb,  use  one  design  variable  to  represent  the  aircraft  that  carries 
both  types  of  bombs.  This  technique  along  with  the  combine  similar 
variables  technique  are  used  to  help  solve  the  ASH  problem  for  this 
thesis.  Their  application  to  the  ABM  problem  Is  reported  In  Chapter 
Four. 

Data  Collection.  After  the  experimental  design  Is  chosen,  data  has 
to  be  collected  from  the  ABH  for  the  purpose  of  estimating  the  postu¬ 
lated  model's  variable  coefficients.  This  step  is  the  application  of 
the  experimental  design  to  the  ABM  setup,  that  Is,  executing  the  AEM  the 
required  number  of  times  with  the  ABM  input  modified  by  the  experimental 
design  for  each  execution.  The  data  collected  from  the  ABM  are  the 
responses  to  each  of  the  five  objectives  for  the  ABM  problem. 

Regression  Analysis  Application.  This  step  applies  the  collected 
data  from  the  last  step  to  a  statistical  regression  package.  The 
regression  package  estimates  the  postulated  model  coefficients.  Once 
the  variable  coefficients  are  ciphered,  the  postulated  model  becomes  the 
estimated  model,  specifically  the  full  estimated  model  since  the  esti¬ 
mated  model  will  contain  all  the  estimated  variable  coefficients. 


The  full  estimated  model  Is  used  to  predict  ABM  responses.  The  ABM 
input  values  are  applied  to  the  full  estimated  equation  instead  of  the 
ABM.  The  result  is  an  estimated  (predicted)  response  to  what  the  ABM 
would  have  given.  The  full  estimated  equation  Is  the  appropriate  model 
to  use  for  ASH  predictability,  but,  should  probably  not  be  used  for 
informational  analysis,  because  the  full  estimated  model  contains  all 
the  variable  terms,  especially  the  non-orthogonal  ones,  that  would  make 
informational  analysis  cumbersome. 

For  Informational  analysis,  the  full  estimated  model  should  be 
reduced,  If  possible.  To  help  reduce  the  full  estimated  model,  the 
variables'  sums -of -squares  are  utilized.  The  variable's  sum-of -squares 
help  determine  which  variables  affect  the  response  the  most:  how  well 
the  response  Is  explained  when  the  variable  Is  varied.  Those  variables 
that  do  not  or  only  slightly  affect  the  response  when  compared  to  other 
variables  are  deleted  from  the  full  estimated  model. 

Those  variables  that  contribute  nothing  to  the  response  can  be 
Immediately  eliminated.  However,  a  cutoff  has  to  be  determined  for 
excluding  all  other  variables  that  only  slightly  affect  the  response. 

The  cutoff  Is  subjective.  For  this  thesis,  the  cutoff  Is  arbitrarily 
set  at  five  percent  of  the  total  sum-of-squares  for  regression  (S8R) . 
Therefore,  all  those  variables  that  make  up  less  than  five  percent  of 
the  SSR  are  omitted.  This,  of  course,  reduces  the  estimated  model  to 
only  those  variables  that  affect  the  response  the  most. 

Before  the  full,  and,  thereby,  the  reduced,  estimated  models  are 
used  In  lieu  of  the  ABM,  they  should  be  shown  to  adequately  represent 
and  accurately  explain  the  ABM.  Also,  the  estimated  models  should  be 
validated  to  assure  the  user  the  estimated  models  represent  the  entire 


ABM  response  surface.  For  these  reasons ,  the  regression  package  also 
computes  regression  statistics  other  than  the  parameters'  sum-of- 
squares.  In  addition,  the  regression  package  computes  the  SSB,  ft3,  and 
residual  statistics.  As  more  fully  explained  in  Chapter  Two,  the  addi¬ 
tional  statistics  help  the  user  evaluate  the  estimated  model's  adequacy, 
expla inability,  and  validity. 

Decode  Coefficients.  The  postulated  model's  variable  coefficients 
are  estimated  using  coded  values  for  the  ABM  input  (equation  2.3). 
Therefore,  if  the  estimated  models,  full  and  reduced,  are  used  with  the 
coded  coefficient  estimates,  predictability  and  informational  analysis 
are  hampered,  because,  to  use  the  estimated  models,  all  ABM  input  would 
have  to  be  coded.  So,  to  enhance  predictability  and  informational 
analysis,  the  estimated  variable  coefficients  are  decoded. 

Postulated  Model  Completion.  After  the  variable  coefficients  are 
decoded,  the  construction  of  the  postulated  model  is  completed  by 
inserting  the  decoded  variable  coefficients  into  their  respective  places 
within  the  postulated  model.  Once  the  postulated  model  is  completely 
built,  it  is  referred  to  as  the  estimated  model  or  estimated  equation. 

Bstlmmted  Modal  validation.  The  estimated  model  is  checked  for 
validity  by  comparing  its  output  to  ABM  output  using  twenty  randomly 
chosen,  previously  unused  data  points.  The  residual  statistic  from 
multiple  regression  is  used  to  aid  in  the  validation  process  (discussed 
in  Chapter  Two).  The  residuals  are  summed,  and  then  their  mean  and 
standard  deviation  are  computed.  Evaluation  of  the  results  is  at  the 
discretion  of  the  user.  The  user  should  know  what  limits  are  acceptable 
for  the  residuals'  mean  and  standard  deviation. 


Methodology  Too la 

Two  computer  tools  are  developed  to  implement  the  methodology.  The 
first.  Tool  One,  is  written  in  Fortran  77.  Tool  One  has  two  functions. 
First,  Tool  One  collects,  organizes,  and  develops  all  the  necessary 
input  for  AIM  executions.  Second,  Tool  one  aids  the  user  in 
constructing  and  validating  the  postulated/estimated  model. 

The  second  tool.  Tool  Two,  is  written  with  digital  commands  fro* 
the  Digital  Command  Language  (DCL)  of  the  VAX/VHS  11/785  computer.  Tool 
Two's  purpose  is  to  execute  the  AIM  the  required  number  of  tlaes  and 
collect  the  AIM  output  in  a  specified  format  for  input  to  a  regression 
package . 

Tool  One.  Fortran  77  was  chosen  as  the  computer  language  for  this 
programing  tool  because  Fortran  is  a  widely  used  language  in  the  Air 
Force.  Appendix  B  shows  the  Fortran  code  and  Appendix  C  contains  the 
User's  Guide  for  Tool  One.  By  coding  Tool  One  in  Fortran  77,  the 
acconplishnent  of  the  portability  subsidiary  objective  (fron  Chapter 
One)  Is  attenpted.  Tool  One  consists  of  five  najor  parts:  data  input, 
coded  design,  uncoded  design,  regression  application,  and  coefficient 
decoding. 

Data  Input.  The  user  is  queried  via  the  computer  terminal  for 
all  data  input  that  relate  to  the  ABM  variables  of  Interest.  The  user 
is  asked  to  Input  interactively  the  number  of  design  variables,  their 
names  (MMII,  B-52,  Trident  C4,  etc.),  their  ranges,  and  the  number  of 
AIM  input  variables  each  postulated  variable  controls,  (i.e.,  a  B-52 
postulated  variable  can  control  two  ABM  input  variables  because  a  B-52 
can  carry  both  gravity  bombs  and  SRAMs  at  the  same  time.)  The  data  is 
checked  Internally  for  program  limitations  and  "common  sense”  mistakes 


as  the  usee  Inputs  It.  If  a  alstake  occurs ,  the  user  is  asked  to 
reenter  the  last  Input. 

Uncoded  Design.  This  section  of  the  code  takes  the  user  input 
and  applies  the  applicable  Box-Behnken  design  to  produce  a  data  matrix 
containing  ABM  inputs.  Bach  row  of  the  data  matrix  represents  one 
execution  of  the  ABM.  The  ABH  input  data  In  the  data  matrix  Is  uncoded, 
and,  thus,  represent  values  for  all  the  ABM  variables  of  interest,  only 
adjusted  per  row  by  the  experimental  design,  once  the  uncoded  design  Is 
built.  Tool  Two  applies  it  to  the  ABM  for  data  collection. 

Coded  Design.  After  Tool  Two  is  finished  with  ABM  execution 
and  data  collection,  Tool  One  is  re-executed.  The  coded  design  section 
of  Tool  One  is  used  to  produce  the  same  data  matrix  as  in  the  previous 
section,  but  In  coded  values,  i.e.,  1,  0,  and  +1  (refer  to  equation 
2.3).  The  coded  data  matrix  and  the  ABM  output  collected  by  Tool  Two 
are  used  as  Inputs  to  the  regression  package. 

Regression  Application.  The  coded  data  matrix  (experimental 
design)  and  the  collected  ABM  data  (from  the  experimental  design)  are 
used  as  Inputs  to  a  regression  subroutine,  within  Tool  One,  for  the 
purpose  of  estimating  the  postulated  model's  coefficients.  Also,  the 
sum-of-squares  for  each  estimated  model  variable  is  computed  to  help  the 
user  reduce  the  full  estimated  model,  if  so  desired.  Furthermore,  the 
88B,  R*,  and  residual  statistics  are  calculated  to  help  the  user  check 
the  estimated  model  for  accuracy,  explalnablllty,  and  validity.  The 
regression  subroutine  Is  included  in  Tool  One  to  help  make  the  RSMed-ABM 
methodology  more  portable  and  flexible.  If  a  more  advanced,  dedicated 
regression  package(s)  ls/are  acquired  (e.g.,  8 AS,  BMDP,  or  SPSS),  Tool 
One's  regression  subroutine  need  not  be  used. 


Decode.  The  Decode  section  is  used  after  the  regression 
package  has  estimated  the  postulated  model's  variable  coefficients.  The 
input  to  the  Decode  section  are  the  beta  coefficient  estimates  from  the 
regression  package.  The  output  from  Decode  is  the  estimated  decoded 
coefficients  for  the  postulated  model's  equation. 

Tool  Two.  The  DCL  commands  that  make  up  Tool  Two  are  part  of  the 
VAX/VMS  command  language  that  allows  the  user  to  converse  with  the 
11/785  <24:2-22).  Consequently,  Tool  Two  may  not  be  as  portable  as  Tool 
One  since  the  DCL  commands  are  peculiar  to  the  VAX/VMS  system.  The  DCL 
commands  that  make  up  Tool  Two's  program  are  shown  in  Appendix  D. 

The  purpose  for  Tool  Two  is  to  regulate  the  executions  of  the  ABM. 
The  output  from  the  Uncoded  Design  section  of  Tool  One  is  the  input  to 
Tool  Two.  The  output  from  Tool  Two,  the  collected  ABM  responses,  is 
used  as  input  to  the  Coded  Design  and  Regression  sections  of  Tool  One. 

The  automated  RSMed-ABM  problem-solving  methodology  Involves  devel¬ 
oping  an  ABM  scenario,  postulating  an  alternate  model,  choosing  an 
experimental  design,  collecting  ABM  data,  applying  regression  analysis 
for  coefficient  estimation  and  model  examination,  decoding  the  estimated 
model's  coefficients,  completing  the  estimated  model's  construction,  and 
validating  the  estimated  model. 

Most  of  the  time-consuming  steps  have  been  incorporated  into  two 
computer  programs.  The  first  computer  program  (Tool  One)  collects  the 
data  characteristics  for  the  ABM  variables  and  then  supplies  the  second 
computer  program  (Tool  Two)  with  a  coded  data  matrix  (experimental 
design).  Tool  Two  uses  the  coded  data  matrix  to  control  ABM  execution 


and  data  collection,  next.  Tool  one  takes  the  ABM  data  collected  by 
Tool  Two  and  uses  It  with  a  coded  version  of  the  ABM  data  matrix  as 
Input  to  a  regression  subroutine  within  Tool  One.  Tool  One  uses  the 
output  from  the  regression  package  (the  variable  coefficient  estimates) 
as  input  to  the  Decode  section  of  Tool  One.  The  output  from  the  Decode 
section  (the  decoded  variable  coefficient  estimates)  is  then  Inserted 
Into  the  postulated  model  equations  creating  the  estimated  model. 
Finally,  the  estimated  model  Is  checked  for  validity  by  comparing  Its 
output  to  corresponding  ABM  output. 

The  next  chapter  further  explains  the  methodology  steps  through  an 
application.  Detailed  use  of  the  programing  tools  are  highlighted  so 
the  user  can  become  easily  familiar  with  their  use. 


ISftLL  M  Application 

Introduction 

This  chapter  reports  an  application  of  the  RSNed-AM  Methodology 
outlined  in  chapter  Three  to  an  ABN  problem/scenarlo.  The  objective  of 
the  application  Is  to  check  and  demonstrate  the  automated  RSMed-ABH 
program.  The  progress  of  the  application  Is  reported  through  the  metho¬ 
dology  steps  (discussed  In  Chapter  Three):  the  ABN  Setup,  Nodel  Postu¬ 
lation,  Experimental  Design  Selection,  Data  Collection,  Regression 
Application,  Coefficient  Decoding,  Estimated  Nodel  Completion,  and  Esti¬ 
mated  Nodel  Validation. 

The  AM  setup  Step 

The  ABN  setup  Is  twofold:  formulating  and  recording.  Formulating 
embodies  understanding  and  establishing  the  AEN  scenario;  recording 
involves  preparing  and  establishing  the  Inputs  for  AEN  executions:  an 
ABN  Input  file. 

AM  Setup  For  mala  tloe.  The  am  setup  formulation  is  composed  of 
four  parts:  choosing  the  variables  of  interest,  establishing  a  target 
base,  selecting  targeting  strategies  and  priorities,  and  picking  the 
dependent  var table (s)  for  the  measures  of  effectiveness. 

Var tables  of  Interest.  A  hypothetical  eighteen  variable 
problem  Is  used  with  the  application  of  the  automated  RSNed-AM  program. 
Each  variable  represents  a  weapon  used  by  the  U.S.  to  strike  the  Soviet 
Union  as  controlled  by  the  AM.  Each  weapon  Is  listed  In  Figure  4.1 
along  with  Its  range  of  values,  carrier  type,  and  the  number  of  warheads 
per  carrier.  (Figure  4.1  shows  eighteen  variables  but  only  lists 


Naaber  ASM  Variable  Range 


Carrier  Warheads/Carrier 


1 

MMII 

0  -  450 

I  CBM 

1 

1 

1 

2 

MMIII 

0  -  250 

ICBM 

3 

I 

MM1IIA 

100  -  300 

I  CBM 

3 

1 

3 

PKeeper (MX) 

0  -  100 

ICBM 

10 

1 

4 

MI  CBM 

0  -  200 

ICBM 

1 

1 

5 

PosC3 

176  -  304 

SLBM 

10 

1 

6 

PosC4 

192  -  192 

SLBM 

8 

1 

TrlC4 

48  -  192 

SLBM 

8 

1 

7 

TriD5 

0  -  336 

SLBM 

8 

1 

8 

B52GRV 

0  -  156 

Aircraft 

4 

1 

9 

B52SRM 

0  -  156 

Aircraft 

4 

1 

10 

B52CMC 

40  -  156 

Aircraft 

12 

1 

11 

PB111GRV 

0-60 

Aircraft 

2 

1 

12 

PB111SRM 

0-60 

Aircraft 

4 

1 

13 

B1BGRV 

30  -  100 

Aircraft 

4 

1 

14 

B1B8RM 

30  -  100 

Aircraft 

4 

1 

15 

B1BALCM 

30  -  100 

Aircraft 

8 

1 

16 

ATB 

0  -  124 

Aircraft 

12 

1 

1 

Pig  4.1  The 

Initial  Eighteen  ABM  Variables 

sixteen  nuabers.  Pour  of  the  weapons  will  be  coablned  to  fora  two 
weapons.  Therefore,  eighteen  weapons  will  exist  in  sixteen  variables. 
More  lnforaatlon  is  given  under  the  Bxperiaental  Design  Selection  Step 
section  of  this  chapter.) 

The  Target  Base.  The  target  base  is  developed  froa  hypo¬ 
thetical  data  used  with  an  APIT  class  asslgnaent.  The  hypothetical  data 
listed  low  and  high  target  projections  over  a  ten  year  period  starting 
with  year  1985.  The  high  projection  of  year  1990  is  taken  as  the  target 
base.  However,  after  Baking  soae  prelialnary  ABM  executions  with  the 
ABM  weapon  variables  listed  in  Plgure  4.1,  the  nuaber  of  targets  was 
adjusted  downward  to  allow  the  ABM  to  produce  high  daaage  expectancy 


Pig  4.2  The  ABN  Target  Base 


calculations  through  the  application.  Figure  4.2  shows  the  ABN  target 
base  used,  after  the  adjustment,  in  the  application  of  the  automated 
RS Med -ABM  program.  The  targets  are  listed  by  name  along  with  the  number 
of  each  target  shown  immediately  to  the  right  of  its  names. 

Plgure  4.3  shows  the  same  targets,  only  grouped  into  categories. 

The  purpose  for  the  categorization  is  to  later  allow  the  usance  of 
strategies  and  prioritization  of  goals  by  category  rather  than  by 
specific  target.  Through  the  categorization  of  the  targets,  the  five 
objectives  of  the  ABM  problem  (described  in  Chapter  One)  are  defined. 

Selecting  Strategies  and  Priorities.  Targeting  strategies  and 
priorities  help  create  a  realistic  arsenal  exchange  environment.  There¬ 
fore,  four  strategies  and  six  priorities  are  used.  The  targeting 
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Muaber 

Target  Category 

Targets 

1 

Leadersh Ip/Coaaand , 
Control,  Coaauni cat ions, 
and  Intelligence  (LC3I) 

1  thru  3 

1 

l 

2 

Strategic  Nuclear 

4  thru  10  I 

3 

Conventional 

11  thru  14 

4 

Industrlal/Bconoaic 

15  thru  17  I 

5 

Tlae  Urgent 

3  thru  5  and  9 

1 

Fig  4.3  ASM  Target  Categories 
(Reference  Figure  4.2  for  target  nuaber  definitions) 


strategies  and  priorities  are  listed  In  Figure  4.4.  The  priorities  are 
"soft*  priorities  Instead  of  "hard”  priorities.  "Soft*  priorities  allow 
the  ABM  to  do  as  well  on  a  particular  priority  as  possible  before  aoving 
on  to  the  next  lower  priority.  *Hard"  priorities  do  not  allow  the 
targeting  of  lower  priority  objectives  until  the  higher  priority 
objectives  are  fulfilled. 

The  Dependent  Var tablet s) .  The  dependent  variable  is  daaage 
expectancy  (DB):  what  is  the  expected  daaage  to  any  and  all  targets 
given  the  ABM  weapons  and  targeting  strategies  and  priorities?  For  the 
RSMed-ABM  application,  five  dependent  variables  exist.  Except  for  the 
Tlae  Urgent  targets,  each  target  category  listed  in  Figure  4.3  depicts  a 
dependent  variable.  The  fifth  dependent  variable  represents  the  daaage 
expectancy  for  all  targets.  (It  Is  the  estlaated  equation  for  the  fifth 
objective  that  Is  later  used  to  show  the  predictability  and  lnfor- 
■ational  analysis  advantages  of  Saith's  R8M  variant.)  Bach  dependent 
variable  and  its  associated  target  category  Is  shown  in  Figure  4.S. 


Targeting  Strategy  One: 

Limit  the  maximum  number  of  RVs  from  any  carrier 
allowed  to  Impact  on  a  target  to  three. 

Targeting  Strategy  Two: 


Exclude  the  probability  of  arrival  from  calculations 
of  Impacts  limit. 

Target ing  Strategy  Three: 

Set  minimum  damage  expectancy  (DE)  limits  for  each 
target : 


Minimum  DB  (percentage) 


Target  Humber 

1  thru  10 
11  thru  14 
15  thru  17 

Targeting  Strategy  Pout: 


Specify  which  weapons  are  allowed  to  attack  a  target: 


Target  Number 

1,  2,  8,  and  11  thru  17 
3  thru  6  and  9 
7  and  10 

Targeting  Priorities: 
Priority 


Weapons  Allowed  To  Attack 

1  thru  16 
1  thru  7 
13,  14,  and  16 


Cover  Targets  By 
Category  or  Number 


Time  Urgent 
1  and  2 
7,  8,  and  10 
Conventional 
Industrial/Bconomlc 
All 


Pig  4.4  ASM  Targeting  Strategies  and  Priorities 
(Reference  Pigures  4.1  thru  4.3  for  the  definition 
of  each  weapon  and  target  number /category) 


Dependent  Variable 


Target  Category 


LC3I 

Strategic  Nuclear 
Conventional 
Industrial/Population 
All 


Ke cording  The  ABH  Setup;  The  MW  Input  File.  Once  the  ABM  setup 
is  formulated,  it  is  recorded  to  be  used  later  £or  executing  the  ABM. 
Recording  of  the  ABM  fornulation  is  done  through  the  ABM  input  file: 
IABM1.DAT.  The  IASM1.DAT  file  contains  the  ABM  code  that  represents 
each  elenent  of  the  ABM  fornulation.  An  exanple  of  the  IABM1.DAT  file 
fron  one  of  the  execution  runs  is  shown  in  Appendix  B.  The  execution 
exanple  shows  the  four  categories  of  the  ABM  setup:  the  variables  of 
Interest  (weapons),  a  target  base,  the  targeting  strategies  and  prior¬ 
ities,  and  the  dependent  variables. 

&£  fi  ti&R 

The  second  part  of  the  RSMed-ABM  Methodology  is  postulation  of  a 
model  that  can  represent  the  ABM  output  given  an  ABM  setup  as  described 
in  the  ABM  Setup  Step  section  of  this  chapter.  For  this  thesis,  and  as 
discussed  in  Chapter  Three,  model  postulation  will  always  be  a  second- 
order  polynomial  equation  (equation  2.2).  However,  this  need  not  be  so. 
If  the  RSMed-ABM  program  allowed  the  user  the  flexibility  of  choosing  an 
equation  from  among  many,  this  step  would  have  to  be  considered.  The 
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user  would  select  an  equation  to  best  represent  the  ABM  output  given  an 
ABM  setup  scenario  (discussed  In  The  ABM  Setup  Step  section  of  this 
chapter).  Consequently,  The  Model  Postulation  step  of  the  RSMed-AEM 
methodology  Is  Included  within  this  application  write-up  for 
completeness  and  as  a  reminder  to  the  user  that  the  postulated  model  is 
dependent  on  the  ABM  Setup  scenario.  If  the  user  does  not  believe  that 
equation  2.2  will  accurately  represent  a  particular  ABM  setup  scenario, 
then  this  RSMed-ABM  program  should  not  be  used  since  the  RSMed-ABM 
program  is  designed  to  "fit"  a  second-order  polynomial  equation. 

Sift  Experimental  Bfgjgft  IfliftCfcifta.  Step 

As  with  the  ABM  setup  step,  the  Experimental  Design  Selection  step 
is  also  twofold:  formulation  and  recording.  The  formulation  part 
involves  selecting  an  experimental  design  and  then,  if  necessary,  manip¬ 
ulating  the  ABM  variables  into  the  required  number  of  design  variables 
needed  to  fit  the  chosen  experimental  design.  Recording  Involves  using 
the  R8Med-ABM  program  to  interactively  enter  all  information  pertaining 
to  the  design  variables. 

SfiftlA  ft.lectlM  formulation.  When  choosing  the  ABM 
variables,  thought  must  be  given  to  which  experimental  design  will  be 
used  since  the  selection  of  experimental  designs  are  limited.  As  previ¬ 
ously  mentioned,  eighteen  ABM  variables  are  used  for  the  RSMed-ABM 
program  application,  but  the  largest  experimental  design  built  into  the 
R8Hed-ASM  program  is  one  for  sixteen  variables.  Therefore,  reduction 
techniques,  discussed  In  Chapter  Three,  are  applied  to  reduce  the  number 
of  ABM  variables. 

4$ 


Coabination 

ABM  Variables 

Design  Variable 

1 

B52GRV 

B52SRM 

B52PBM 

2 

FB111GRV 

FBlllSRH 

FB111PBM 

3 

B1BGRV 

BlBSRH 

B1BALCM 

BIB 

Pig  4.6  The  Design  Variables  Bstabllshed  Pro* 
Using  The  Variable  Control  Reduction  Technique 


The  first  variable -reduct ion  technique  used  Is  the  ABM  variable 
control  technique:  hov  many  design  variables,  if  any,  can  control  more 
than  one  ABM  variable?  A  closer  examination  of  Figure  4.1  shows  that 
seven  of  the  eighteen  ABM  variables  can  be  controlled  by  three  design 
variables.  A  B-52  can  carry  SRAMs  and  gravity  boabs  at  the  same  tine, 
thus  enabling  the  coabination  of  the  B-528RM  and  B-52GRV  ABM  variables 
Into  a  B-52PBM  design  variable.  Siailar  combinations  can  be  aade  of  the 
FBlll  ABM  variables  and  the  BIB  ABM  variables.  Figure  4.6  shows  the 
design  variables  produced  froa  the  three  different  ABM  variable  combi¬ 
nations.  (Mote:  All  three  BIB  ABM  variables  are  combined  into  one 
single  BIB  design  variable,  whereas  the  three  B$2  ABM  variables  require 
two  design  variables:  one  for  the  B52CMC  and  one  for  the  combination  of 
the  B52GRV  and  B52SRM.  This  stems  froa  assuming  that  a  BIB  can  carry 
both  gravity  boabs  and  cruise  missiles  at  the  same  time  and  that  a  B-52 


cannot . ) 


Humber 

Design  Variable 

Range 

Carrier 

Warheads/Carr ier 

1 

MMII 

0  -  450 

ICBM 

1 

2 

MMIII 

0  -  250 

ICBM 

3 

MMIIIA 

100  -  300 

ICBM 

3 

3 

PKeeper (MX) 

0  -  100 

ICBM 

10 

4 

HICBM 

0  -  200 

ICBM 

1 

5 

PosC3 

176  -  304 

SLBM 

10 

6 

PosC4 

192  -  192 

SLBM 

8 

TrlC4 

48  -  192 

SLBM 

8 

7 

Tr  1D5 

0  -  336 

SLBM 

8 

8 

BS2PBN 

0  -  156 

Aircraft 

8 

9 

B52CMC 

40  -  156 

Aircraft 

12 

10 

PB111PBM 

0-60 

Aircraft 

6 

11 

BIB 

30  -  100 

Aircraft 

16 

12 

ATB 

0  -  124 

Aircraft 

12 

Pig  4.7A  Inclusion  of  the  Control  Variables 


After  applying  the  control -variable  reduction  technique,  eighteen 
weapons  are  reduced  to  fourteen  design  variables.  The  results  are  shown 
In  Figure  4.7A.  (Likened  to  Figure  4.1,  fourteen  variables  are  shown 
but  only  twelve  are  listed.  The  explanation  Is  forthcoming. )  Ho  Box- 
Behnken  experimental  design  exists,  however,  for  fourteen  design  vari¬ 
ables.  The  closest  design  Is  either  the  twelve  or  sixteen  variable 
experimental  designs.  Since  a  sixteen-variable  design  requires  almost 
twice  as  many  runs  as  a  twelve -variable  design,  the  twelve-variable 
design  Is  selected. 

To  reduce  fourteen  variables  to  twelve,  a  second  variable-reduction 


technique  Is  employed:  the  combination  of  similar  variables.  For  the 
application,  the  manipulation  involves  combining  sets  of  similar 
weapons.  Looking  again  at  Figure  4.1,  eighteen  variables  are  shown  but 


Number 

ABM  Variable 

Range 

Carrier 

Warheads/Carrier 

1 

mu 

0  -  450 

ICBM 

1 

2 

mm 

100  -  550 

ICBM 

3 

3 

PKeeper (MX) 

0  -  100 

ICBM 

10 

4 

MICBM 

0  -  200 

ICBM 

1 

5 

PosC3 

176  -  304 

SLBM 

10 

6 

PosTriC4 

240  -  384 

SLBM 

8 

7 

TriD5 

0  -  336 

SLBM 

8 

8 

B52GRV 

0  -  156 

Aircraft 

4 

9 

B528RM 

0  -  156 

Aircraft 

4 

10 

BS2CMC 

40  -  156 

Aircraft 

12 

11 

PB111GRV 

0-60 

Aircraft 

2 

12 

PB111SRM 

0-60 

Aircraft 

4 

13 

BlBGRV 

30  -  100 

Aircraft 

4 

14 

B1BSRM 

30  -  100 

Aircraft 

4 

15 

B1BALCM 

30  -  100 

Aircraft 

8 

16 

ATB 

0  -  124 

Aircraft 

12 

Pig  4.7B  The  Coabinatlon  of  Similar  Variables 
(Refer  to  Figure  4.1) 


only  sixteen  are  numbered.  This  was  done  in  anticipation  of  using  the 
similar  variables,  variable-reduction  technique.  Prom  Figure  4.1,  two 
sets  of  similar  variables  exist:  the  combination  of  the  mills  with  the 
MMIIIAfl,  and  the  coabinatlon  of  the  Poseidon  and  Trident  C4  SLBHs.  The 
weapons  in  both  sets  are  very  similar  and  therefore  allow  the  variable 
reducing  merger.  Figure  4.7B  shows  the  change  in  Figure  4.1  after  the 
similar  variables  are  combined. 


After  applying  the  combination  of  similar  variables,  variable- 
reduction  technique,  the  fourteen  design  variables  are  reduced  to 
twelve.  The  assumption  for  using  the  similar  variables,  variable- 
reduction  technique  is  that  informational  analysis  is  not  important  for 
those  four  individual  weapons  that  are  merged.  If  it  is,  then  the 


Number 

Design  Variable 

i  Range 

Carrier 

Harheads/Carrler 

1 

MM1I 

0 

- 

490 

ICBM 

1 

2 

mm 

100 

- 

550 

ICBM 

3 

3 

PKeeper (MX) 

0 

- 

100 

ICBM 

10 

4 

NICBM 

0 

- 

200 

ICBM 

1 

5 

PosC3 

176 

- 

304 

SLBM 

10 

6 

PosTriC4 

240 

- 

384 

SLBM 

8 

7 

Tr  1D5 

0 

- 

336 

SLBM 

8 

8 

B52PBN 

0 

- 

156 

Aircraft 

8 

9 

B52CMC 

40 

- 

156 

Aircraft 

12 

10 

FBlllPBN 

0 

- 

60 

Aircraft 

6 

11 

BIB 

30 

- 

100 

Aircraft 

16 

12 

ATB 

0 

- 

124 

Aircraft 

12 

Fig  4.8  The  Finalized  Twelve  Design  Variables 


mergers  would  not  occur;  rather  two  dummy  design  variables  would  be  used 
to  Increase  the  number  of  design  variables  from  fourteen  to  sixteen 
since  there  is  a  Box-Behnken  design  for  sixteen  design  variables.  But, 
with  the  assumption,  the  reduced  set  of  variables  (weapons),  from 
eighteen  AIM  variables  to  twelve  design  variables,  is  listed  in  Figure 
4.8,  along  with  the  updated  range,  the  carrier  type,  and  the  number  of 
warheads  per  carrier. 

Record lnq  the  txoerl mental  Design  Selection.  The  design  variable 
information  contained  in  Figure  4.8  is  now  entered  into  the  R8Hed-AEM 
program.  The  R8Med-ARM  program  is  started  (refer  to  Appendix  C),  and 
subroutine  INPTDATA  is  chosen  (selection  I)  once  the  main  menu  appears 
via  the  CRT  terminal  (Figure  4.9).  After  the  INPTDATA  subroutine  is 
started,  the  Information  on  the  twelve  design  variables  is  entered  and 
saved  in  a  file  entitled  VARIBLBS.DAT  (Appendix  F).  Three  other  files 


Fig  4.9  Automated  RSM  Program's  Main  Menu 


are  created  by  the  INPTDATA  subroutine  to  be  used  later  as  Input  with 


other  main-menu  subroutines:  the  CODEDSGN. IN  file  (shown  In  Appendix  G) 


for  the  CODEDSGN  subroutine,  the  DECODE. IN  file  (shown  In  Appendix  H) 


for  the  DECODE  subroutine,  and  the  RGRSSION.IN  file  (Appendix  I)  for  the 


RGRSSION  subroutine. 


Data  Collection  Step. 


After  using  subroutine  INPTDATA  to  enter  the  design  variable  Infor¬ 


mation  and  saving  that  Information  In  the  file  VARIBLES.DAT,  the  main 


menu  reappears,  and  subroutine  codedsgn  is  chosen  (selection  u). 
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Subroutine  CODEDSGN  does  not  Interact  with  the  user;  rather,  subroutine 
CODEDSGN  just  creates  a  file.  Vhen  selection  U  is  chosen,  the  file 
AEM.DAT  (Appendix  J)  is  created  for  later  use  with  Tool  Two  (refer  to 
Chapter  3).  After  the  AEM.DAT  file  is  created,  the  main  menu  reappears 
and  selection  E  is  chosen;  the  RSMed-AEM  program  is  exited. 

With  the  AEM  input  file  (IAEM1.DAT)  and  the  AEM  experimental  design 
file  (AEM.DAT)  created.  Tool  Two  (Appendix  D)  is  used  with  the  AEM  to 
control  and  amass  the  data  collection.  Tool  Two  automatically  executes 
the  AEM  193  times.  For  each  execution,  an  AEM  output  file  (OAEMl.DAT) 
is  created  (Appendix  K).  With  each  execution,  input  from  the  AEM.DAT 
file  is  collected,  along  with  the  dependent  variable  values  from  the 
OAEMl.DAT  file  (Appendix  K),  and  stored  in  a  file  entitled  STORAGE.DAT 
(Appendix  L). 

Regression  Step. 

So  far,  an  AEM  scenario  has  been  coded  into  an  IAEM1.DAT  file;  an 
AEM  experimental  design  file  entitled  AEM.DAT  has  been  created;  and  Tool 
Two  has  used  those  two  files  to  control  the  AEM  executions  while 
collecting  and  storing  data  generated  by  each  execution  in  a  file  called 
STORAGE.DAT.  To  execute  the  regression  package  on  the  RSMed-AEM 
program,  the  data  in  file  AEM.DAT  has  to  be  coded  according  to  equation 
2.3  and  the  data  in  file  STORAGE.DAT  has  to  be  modified  to  only  show  the 
responses  of  the  dependent  variables. 

The  STORAGE.DAT  file  is  first  modified  by  manually  stripping  all 


the  lines  containing  the  values  for  the  AEM  weapons.  The  modification 
Is  accomplished  by  deleting  every  other  line  starting  with  line  one. 
The  modified  file,  RESPNSBS.IN,  is  shown  in  Appendix  M. 


To  code  the  AEN.DAT  file,  the  RSNed-AEM  program  Is  restarted,  once 
the  main  menu  appears,  the  INPTDATA  subroutine  is  first  chosen 
(selection  I)  to  re-initialize  the  design  variable  information.  Re-inl- 
tialization  is  done  by  reading  the  VARIBLES.DAT  file  again.  (Recall  the 
VARIBLES.DAT  file  saved  the  design  variable  characteristics  that  were 
previously  interactively  entered . )  After  re-initialization  is 
accomplished,  the  main  menu  reappears.  The  CODEDSGN  subroutine  is  again 
chosen,  but  this  time  selection  C  is  picked.  As  noted  earlier,  the 
CODEDSGN  subroutine  does  not  interact  with  the  user;  it  just  creates  a 
file.  With  selection  C  chosen,  the  CODEDSGN  subroutine  uses  the 
CODEDSGN. IN  file  to  create  the  DSGNMTRX . IN  file  (Appendix  N).  Once  the 
DSGNHTRX . I N  file  is  created,  the  main  menu  reappears. 

With  the  creation  of  the  three  required  input  files  now  complete 
(the  third  input,  the  RGRSSION.IN  file,  was  created  earlier  by  the 
INPTDATA  subroutine),  the  RGRSSION  subroutine  is  chosen  from  the  main 
menu  (selection  R).  All  five  objectives  (the  dependent  variables  listed 
in  Figure  4.5)  are  processed  through  the  RGRSSION  subroutine.  The 
results,  except  for  coefficient  estimates,  from  the  RGRSSION  subroutine 
are  written  to  the  REGRESS.DAT  file  (Appendix  0)  to  be  printed  later. 
Once  the  regression  process  is  complete,  the  RGRSSION  subroutine  writes 
the  estimated  coefficients  to  the  CODEDBTS . IN  file  (Appendix  P)  and  then 
releases  control  back  to  the  main  menu. 

To  verify  that  the  RGRSSION  subroutine  gives  correct  answers,  the 
RGRSSION  output  for  the  fl^th  objective  is  compared  to  regression  output 
from  the  SAS  package  using  the  same  Inputs.  SAS  is  a  widely  accepted 
statistical  package.  SAS's  input  code  is  shown  in  Appendix  Q.  sas's 
output,  in  Appendix  R,  contains  the  same  values  for  SSR,  SSE,  SSTO,  R2, 


and  residual  statistics  along  with  the  coded  parameter  estimates  and 
individual  sum-of-squares  (Type  I  Sum-0£-Squares)  as  does  the  RGRSSION 
output  for  the  fifth  objective  shown  in  Appendices  0  and  P. 

The  Decode  Coefficients  Step 

The  RGRSSION  subroutine  has  now  estimated  the  coefficients  to  the 
postulated  model  (equation  2.2).  However,  a  coded  design  was  used  for 
the  estimation.  Once  the  main  menu  reappears,  the  DECODE  subroutine  is 
chosen  (selection  D).  The  DECODE. IN  file  (created  by  the  INPTDATA 
subroutine)  and  the  CODEDBTS.IN  file  (created  by  the  RGRSSION 
subroutine)  are  used  as  input  by  the  DECODE  subroutine.  The  coded 
parameter  estimates  in  the  CODEDBTS.IN  file  are  decoded  and  stored  In 
the  DECODE. OUT  and  XCUTEQNS.IN  files  (Appendices  T  and  S).  The  main 
menu  reappears  when  the  parameter  decoding  is  complete. 

The  Estimated  Model  Completion  Step 

Vlth  the  parameter  estimates  decoded,  the  estimated  model  can  now 
be  completed.  The  decoded  parameter  estimates  listed  in  the  XCUTEQNS.IN 
file  are  joined  with  their  design  variables.  The  process  of  joining  the 
parameter  estimates  with  their  respective  design  variables  appears 
complicated  at  first,  but  is  easy  to  accomplish  after  demonstrating  the 
process. 

Figure  4.8  and  Appendix  T  are  used  for  the  demonstration. 

Completion  of  the  postulated  model  (equation)  for  the  fifth  objective 
will  be  demonstrated.  From  Appendix  T,  the  parameter  estimates  for  the 
fifth  objective  are  located  in  the  last  92  lines.  The  first  line 
Informs  the  user  that  the  following  parameter  estimates  belong  to  the 
fifth  objective. 


The  joining  process  starts  with  the  first  H  *  1  parameter  estimates 
where  N  Is  the  number  of  design  variables  (twelve  In  this  example).  The 
INTERCEPT  value  is  listed  first  followed  by  N  linear  parameter 
estimates.  The  N  linear  parameter  estimates  are  joined  with  their 
respective  design  variables  in  the  order  given  by  Figure  4.8  (i.e.,  the 
next  parameter  estimate  after  the  INTERCEPT  term  is  joined  with  the  MMII 
design  variable;  the  following  parameter  estimate  is  joined  with  the 
mill  design  variable;  and  et  al). 

The  first  N  *  l  parameter  estimates  are  joined  with  the  INTERCEPT 
and  the  linear  design  variable  terms.  The  remaining  N!  parameter 
estimates  are  joined  with  the  squared  and  cross  design  variable  terms. 
The  procedure  for  joining  the  remaining  N!  parameter  estimates  is  to 
successively  descend  the  design  variable  ll3t  (Figure  4.8),  one  design 
variable  at  a  time,  matching  the  next  parameter  estimate  with  the 
squared  term  of  the  design  variable  first  and  then  matching  the 
following  parameter  estimates  with  the  cross  terms  that  result  by  multi¬ 
plying  that  design  variable  with  the  remaining  design  variables.  Once 
the  squared  and  cross  terms  for  the  first  design  variable  are  joined 
(MMII  in  this  example),  descend  the  design  variable  list  (Figure  4.8)  to 
the  next  design  variable  ( KMI I I )  and  repeat  the  procedure,  but  do  not 
Include  any  cross  terms  that  have  already  been  joined  previously.  The 
completion  of  the  postulated  model  for  the  fifth  objective  (All  Targets) 
is  shown  in  Appendix  U. 

The  Estimated  Model  Validation  Step 

Validation  is  accomplished  by  comparing  the  responses  from  the 
estimated  models  with  the  responses  from  the  ASM  for  the  same  set  of 
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Fig  4.10  Validation  Test  Points 


values  assigned  the  design  variables  (weapons).  For  the  application, 
only  the  estimated  model  for  the  fifth  objective  Is  validated.  To 
validate  the  fifth  objective's  estimated  model,  twenty  randomly  chosen 

points  (values  for  the  design  variables),  other  than  the  experimental 

design  points,  are  chosen.  The  design  variables  and  the  twenty  randomly 

chosen  test  points  are  shown  in  Figure  4.10. 
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Fig  4.11  abm  Responses  To  The  Validation  Test  Points 


The  twenty  points  are  first  used  to  execute  the  AEM.  The  ABH.DAT 
file  Is  unually  setup  with  the  data  from  Figure  4.10.  Tool  Two  Is 
again  used  to  control  the  AEM  executions  and  to  collect  the  output  (the 
response)  for  the  fifth  objective  and  store  it  in  the  STORAGE . DAT  file. 
Only  the  fifth  objective  Is  validated,  but  Figure  4.11  shows  the 
responses  for  each  of  the  five  objectives  for  each  AEM  execution. 

After  the  AEM  executions,  the  twenty  points  are  used  to  execute  the 
estimated  aodel  for  the  fifth  objective  only  (Appendix  u).  The  RSMed- 
ABM  program  Is  restarted,  and  the  Regression  and  Decode  Coefficients 
Steps  (refer  to  those  sections  in  this  chapter)  are  repeated.  After  the 


lit  *.?  i.vm 


K  Y7.  TV  VT  WWW 


Execution 

Fifth  Objective's  Response 

1 

67.93 

2 

79.24 

3 

58.25 

4 

75.75 

5 

75.67 

6 

84.43 

7 

52.29 

8 

74.93 

9 

75.30 

10 

79.54 

11 

67.72 

12 

78.54 

13 

57.90 

14 

74.41 

15 

75.56 

16 

83.61 

17 

52.40 

18 

73.82 

19 

74.44 

20 

78.39 
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DECODE  subroutine  Is  finished  and  the  main  menu  reappears,  the  XCUTBQNS 
subroutine  is  picked  (selection  X).  The  fifth  objective  Is  chosen  for 
execution.  By  line,  the  data  from  Figure  4.10  Is  Interactively  entered 
into  the  XCUTBQNS  subroutine  which  then  executes  the  estimated  equation 
for  the  fifth  objective  and  displays  the  response  for  each  execution  via 
the  CRT.  The  responses  are  shown  In  Figure  4.12. 

After  the  responses  from  the  ABM  and  the  estimated  model  executions 
for  the  fifth  objective  are  collected,  the  residuals  are  calculated 
along  with  the  residuals'  mean  and  standard  deviation  (Figure  4.13). 

The  residuals'  mean  (0.164)  Is  quite  small  but  a  little 
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Pig  4.13  Statistical  Table  Por  The  Validation  Test 


misleading  since  three  residuals  (-3.16,  +6.95,  and  +6.24)  are  above  the 
residuals'  standard  deviation  (+/-  2.479).  Plgure  4.10  shows  that  the 
two  largest  residuals  are  from  the  test  data  point  sets  seven  and 
seventeen.  Those  two  sets  had  considerably  fewer  weapons  than  did  the 
other  test  data  point  sets.  Also,  a  comparison  of  the  residuals  for 
those  three  test  points  with  the  residuals  for  the  experimental  design 
points  that  are  close  to  the  test  points  (Appendix  0)  might  further 
explain  why  those  three  test  points  exceed  the  standard  deviation. 
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Conclusion 

This  chapter  describes  the  application  given  the  RSMed-ABM  metho- 
dology.  The  description  of  the  application  is  explained  through  the 
steps  of  the  automated  RSMed-AEM  methodology,  explained  in  Chapter 
Three.  Next,  predictability  and  informational  analysis  are  applied  to 
the  estimated  models  (full  and  reduced)  and  reported  in  Chapter  Five. 


Chapter  Five:  ftMlygiS 


Introduction 

This  chapter  shows  the  advantages  of  applying  RSH  to  a  determi¬ 
nistic  model  (the  ABM).  The  advantages  are  predictability  and  Infor¬ 
mational  analysis.  Only  the  fifth  objective,  the  damage  expected  from 
all  targets.  Is  used  to  show  the  advantages. 

Predictability 

Once  the  coefficients  of  a  postulated  model  have  been  estimated, 
the  now  estimated  model  takes  far  less  time  In  calculating  the  response 
(damage  expectancy)  than  does  the  deterministic  model.  Calculating  the 
response  In  less  time  Is  the  predictability  advantage  that  a  estimated 
model  has  over  the  original  deterministic  model. 

Predictability  has  already  been  demonstrated  in  the  Estimated  Model 
Validation  step  from  Chapter  Four.  After  the  postulated  model  was 
"fitted”  with  the  decoded  parameter  estimates  (from  the  DBC0D8 
subroutine),  the  XCUTEQNS  subroutine  was  used  to  calculate  damage  expec¬ 
tancy  responses  given  the  validation  test  data  of  Figure  4.10.  Once  one 
of  the  validation  test  points  was  entered,  via  the  terminal,  the 
response  was  calculated  and  printed  to  the  screen  In  less  than  a  second. 
It  took  the  ABH  between  one  and  two  minutes  to  calculate  a  response 
given  the  same  validation  test  point. 

The  time  difference  between  the  estimated  model's  execution  and  the 
ABM's  execution  does  not  seem  very  significant,  but  remember  that  the 
ABM  execution  time  is  dependent  on  input  strategies  and  priorities,  if 
more  complex  targeting  strategies  and  priorities  are  used,  the  ABM  would 


require  sore  execution  time.  in  fact,  recall  from  chapter  one  that  the 
AP/XOXR-MAA  uses  targeting  strategies  and  priorities  that  require 
approximately  three  hours  for  one  ABM  execution.  If  a  postulated  model 


was  constructed  for  a  common  AF/XOXR-MAA  targeting  strategy  and  priority 
problem,  the  estimated  model's  advantage  of  predictability  would  be  more 
easily  recognized. 

Using  an  estimated  model's  predictability  advantage  is  not  without 
penalty.  From  the  validation  test  results  In  Chapter  Four,  a  trade-off 
exists:  speed  versus  accuracy.  Vhen  the  estimated  model  was  used  to 
calculate  a  response,  some  accuracy  was  lost  (Figure  4.13).  So,  the 
advantage  of  predictability  is  available  only  if  the  user  can  accept  the 
inaccuracy. 


informational 

The  estimated  model  is  extremely  useful  for  informational  analysis. 
However,  working  with  the  full  model  of  Appendix  U  would  be  frustrating 
and  time  consuming.  Therefore,  if  the  full  estimated  model  can  be 
reduced  (delete  terms  that  do  not  contribute  much  to  the  response),  the 
resulting  reduced  estimated  model  could  be  used  more  effectively  and 
efficiently  for  informational  analysis. 

Obtain  Reduced  Intimated  Model.  The  RGRSSION  subroutine  of  the 
RSMed-ABM  program  is  used  to  reduce  the  full  estimated  model.  However, 
before  the  RGRSSION  subroutine  is  used,  preliminary  files  have  to  be 
created.  So,  upon  entering  the  program  and  after  the  main  menu  appears, 
first  execute  the  INPTDATA  subroutine  (selection  I).  The  design  vari¬ 
able  data  used  in  building  the  full  estimated  model  should  still  be  on 
file  (VARIBLBS.DAT).  Therefore,  after  selecting  the  INPTDATA 
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subroutine,  read  the  data  from  the  variblbs.dat  (Appendix  F)  file  and 
verify  the  data  is  still  valid.  After  verification,  the  INPTDATA 
subroutine  will  create  some  files  (refer  to  Appendix  C)  and  release 
control  back  to  the  main  menu.  Next,  execute  the  CODBDSGM  subroutine 
(selection  C).  The  CODBDSGM  subroutine  also  creates  a  file  (refer  to 
Appendix  C)  and  releases  control  back  to  the  main  menu. 

After  the  preliminary  steps  are  complete,  the  RGRSSION  subroutine 
is  Invoked  (selection  R).  Using  the  regression  output  for  the  fifth 
objective's  full  estimated  model  (Appendix  0)  as  a  guide,  the  RGRSSION 
subroutine  allows  the  user  to  reduce  the  full  estimated  model  through 
deletion  of  unnecessary  terms.  The  RBGRBSS.DAT  file  (Appendix  0)  is 
designed  to  help  the  user  select  which  term  to  delete  or  keep.  The 
terms  are  sorted  in  ascending  order  according  to  their  contribution  to 
the  total  sum-of-squares  for  the  complete  model  (SSR).  After  reviewing 
the  output  for  the  fifth  objective's  full  estimated  model  (Appendix  0), 
the  last  sixteen  terms  account  for  approximately  ninety-five  percent  of 
the  SSR.  The  remaining,  and  previous,  seventy-four  terms  account  for 
about  five  percent  of  the  total  SSR  and,  therefore,  can  be  deleted 
without  affecting  the  response  too  much. 

Upon  execution  of  the  RGRSSION  subroutine,  the  user  is  asked  if 
he/she  wishes  to  delete  a  term.  If  the  user  responds  affirmatively,  all 
terms,  including  the  INTBRCBPT  term,  are  shown  to  the  user.  Bach  term 
is  cross  referenced  with  a  number.  For  deleting  the  seventy-four  terms, 
their  representative  numbers  are  entered  one  by  one  until  all  unwanted 
terms  are  deleted.  (All  user  input  is  checked  for  errors.  The 
INTBRCBPT  term  cannot  be  deleted,  and  no  term  can  be  deleted  more  than 
once.)  Appendix  V  shows  the  regression  output  for  the  reduced  model. 
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Pig  5.1:  Reduced  Estimated  Equation  For  The  Fifth  Objective 

Once  the  RGRSSION  subroutine  is  complete,  control  Is  passed  back  to 
the  aaln  menu.  The  parameter  estimates  for  the  sixteen  undeleted  terms 
are  In  coded  format  (refer  to  Appendix  C).  To  decode  those  parameter 
estimates,  the  DECODE  subroutine  is  chosen  from  the  main  menu  (selection 
D).  So,  after  the  main  menu  reappears,  the  DECODE  subroutine  Is 
selected  and  the  fifth  objective’s  reduced  model  parameter  estimates  are 
decoded.  The  decoded  output  for  the  reduced  estimated  model  Is  shown  In 
Appendix  V  (DECODE. OUT  file).  Figure  5.1  shows  the  same  output  only  in 
equation  form. 

felifin  informational  ADtlmlfl  Sl£li  Xbfi.  IStlMtSfl  Hodel. 

The  reduced  polynomial  equation  shown  in  Figure  5.1  Is  now  easily  used 
to  garner  Information  through  informational  analysis.  Since  no  pure 
quadratic  terme  exist  (refer  to  Equation  2.2  and  the  Experimental  Design 
section  of  Chapter  Three),  the  terms  of  the  reduced  estimated  equation 


ViV.v.v.vv.  /.v.  .'.v.  v.  v 


«*  \ 


are  Independent  of  each  other.  Therefore,  because  the  terns  are  Inde¬ 
pendent  of  each  other,  damage  expectancy  comparisons  are  made  directly 
from  the  equation's  terms.  Figures  5.2  through  5.5  show  some  Infor¬ 
mation  reaped  from  the  reduced  estimated  equation.  But,  remember  that 
the  graphs  In  Figures  5.2  thru  5.5  are  slightly  In  error  since  the 
reduced  estimated  equation  Is  used  Instead  of  the  full.  Also,  the 
graphs  In  Figures  5.2  thru  5.5  are  highly  Indicative  of  the  ABM 
scenario:  the  targeting  strategies  and  priorities  used  and  the  number 
of  weapons  and  targets  available.  (Mote:  the  analysis  examples  that 
follow  were  first  described  by  Smith  and  Melllchanp  (27).) 

Figures  5.2A  and  5.2B  show  damage  expectancy  Increases  per  weapon 
system  carrier.  The  values  are  taken  directly  from  the  coefficients  of 
the  reduced  polynomial  equation.  Both  figures  show  the  weapon  systems 
In  descending  order  by  their  contribution  per  carrier  to  the  total 
damage  expectancy.  The  B-52CMC  and  Trld5  weapon  systems  are  Influenced 
by  two  cross  terms  as  shown  In  Figure  5.1.  They  appear  as  three- 
dimensional  boxes  In  Figures  5.2A  and  5.2B.  The  PKBBP,  ATB,  P0SC3,  and 
POSTRIC4  weapon  systems  are  Influenced  by  only  one  cross  term  each. 

They  are  depicted  as  two-dimensional  planes  In  Figures  5.2A  and  5.2B. 
The  remaining  weapons  are  not  Influenced  by  any  other  term  and,  thus, 
are  shown  In  Figures  5.2A  and  5.2B  as  one-dlmenslonal  lines. 

The  Increase  In  damage  expectancy  per  weapon  system  shown  In 
Figures  5.2A  and  5.2B  does  not  depend  on  how  many  weapons  already  exist 
for  that  particular  weapon  system.  An  additional  BIB  will  Increase 
damage  expectancy  by  0.095  percent  no  matter  If  30  or  99  BlBs  already 
exist.  The  same  applies  to  each  weapon  system.  But,  an  Increase  In 
damage  expectancy  for  any  weapon  system  Influenced  by  cross  terms  does 
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depend  on  the  nuaber  of  existing  cross  tera  weapons.  An  exaaple  Is  the 
B-52CMC  weapon.  The  B-52CHC  provides  the  greatest  Increase  In  daaage 
expectancy,  but  Is  dependent  on  the  nuaber  of  existing  cross  tera 
weapons.  If  the  B-52CHCs  were  Increased  by  just  one  and  the  TrldS  and 
PKEBP  weapons  were  each  at  their  low  range  (Figure  4.8),  the  total 
damage  expectancy  would  increase  by  0.116  percent.  If  either  or  neither 
of  the  B-52CMC  cross  tera  weapons  were  at  their  low  range,  then  an 
additional  B-52CHC  would  not  provide  an  increase  In  total  daaage  expec¬ 
tancy  of  0.116.  Therefore,  the  TridS  and  PKBEP  weapons  have  to  be 
considered  since  they  Interact  with  the  B-52CMC  weapon. 

Figure  5.2B  shows  the  saae  results  for  the  B-52CHC  and  TrldS 

weapons  as  Figure  S.2A  does  only  turned  180  degrees  to  reveal  the  three- 

dlaensional  plane.  Figure  5.2B  shows  that  adding  another  B-52CHC  will 
not  give  any  additional  Increase  In  the  daaage  expectancy  if  the  TrldS 
and  PKEBP  weapons  are  at  their  high  range  values  (Figure  4.8).  This  may 
seea  a  little  aisleadlng,  but  reaeaber  that  any  inforaatlon  received 
through  lnforaatlonal  analysis  of  the  reduced  estlaated  equation  is 
Influenced  by  the  ABM  scenario  (Figures  4.1  thru  4.4).  Also,  using  the 

reduced  aodel  Instead  of  the  full  aodel  provides  slight  error  In  the 

analysis.  Besides,  there  Is  soae  error  by  just  working  with  a  postu¬ 
lated  aodel  that  does  net  Identically  duplicate  the  deterainistlc  aodel 
It  replaces  (Figure  4.13).  But,  In  lieu  of  the  Inherent  slight  errors 
caused  froa  using  the  reduced  estlaated  aodel,  the  pictorial  of  the  B- 
52CMC  weapon  systea  shown  in  Figure  5.2B  is  largely  indicative  of  the 
targeting  strategies  and  priorities  used  and  the  nuaber  of  weapons  and 
targets  available  In  the  AEH  scenario. 
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Figures  S.3A  and  5.3B  show  the  sane  information  as  Figures  5.2A  and 
5.2B  except  the  damage  expectancy  Improvements  are  per  warhead  carried 
by  a  weapon  system.  The  weapons  are  again  shown  in  descending  order  by 
damage  expectancy  contribution.  Figure  5.3A  reveals  that  the  MICBM 
weapon  provides  the  greatest  Increase  in  damage  expectancy  per  warhead 
addition.  In  contrast.  Figure  5.2A  shows  that  the  B-52CMC  delivers  the 
most  damage  expectancy  per  system  carrier  if  its  cross  terms  are  at 
their  low  values. 

The  reduced  estimated  equation  shown  in  figure  5.1  can  also  be  used 
for  weapon  ratio  comparisons.  Because  the  terms  of  the  reduced  model 
are  Independent,  ratios  can  be  computed  with  their  coefficients  that 
show  relative  contributions  of  any  weapon  to  all  other  weapons.  For 
example.  Figure  5.4  shows  how  many  of  the  other  weapons  are  required  to 
equal  the  damage  expectancy  of  one  BIB.  The  weapons  are  again  shown  in 
descending  order  by  the  number  of  weapons  needed.  Again,  the  results  of 
the  graph  are  influenced  by  the  ABM  scenario  and  estimated  equation. 

For  example,  with  the  B-52CMC  cross  terms  (Trld5  and  PKBBP )  at  their 
high  values.  Figure  5.4  shows  that  no  amount  of  B-52CMCs  can  equivalent 
the  damage  expectancy  of  one  BIB  (represented  by  infinity).  This,  of 
course,  does  not  seem  correct,  but,  given  the  ABM  scenario  and  the  B- 
52CMC  cross  terms  at  their  high  values,  there  Is  no  need  for  additional 
B-52CMCS  (refer  back  to  Figures  5.2B  and  S.3B). 

The  best  ratios  are  the  B-52CMC  and  PKBBP  weapons  with  their 
respective  cross  terms  low.  With  their  cross  terms  low.  Its  better  to 
use  the  B-52CMC  and  PKBBP  weapons  over  the  BIB  provided  all  else  is 
equal  between  the  weapons  (l.e.,  the  targeting  strategies,  priorities, 
and  scenario).  But,  as  the  B-52CMC  and  PKBBP  cross  terms  Increase,  so 
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do  their  ratios,  and,  soon,  the  BIB  becomes  better  than  the  B-52CMC  and 
PKBBP  weapons,  given  all  else  remains  the  sane. 

Figures  S.5A  and  5.5B  show  graphs  containing  constant  damage  expec¬ 
tancy  contour  lines  for  different  combinations  of  the  BIB,  B-52PBN,  and 
HH1II  weapons.  Figure  5.5A  exhibits  constant  contour  lines  for  a  damage 
expectancy  of  85  percent,  and  Figure  5.5B  exhibits  constant  contour 
lines  for  an  87  percent  damage  expectancy.  The  remaining  weapons  are 
held  constant  at  predetermined  values. 

From  the  graphs  in  Figures  5.5A  and  5.5B,  three  observations  are 
noticed.  First,  the  difference  between  the  two  graphs  shows  that  higher 
combinations  of  the  three  weapons  are  required  to  maintain  an  87  percent 
contour  line  as  opposed  to  an  85  percent  contour  line.  Second,  from 
both  graphs,  as  the  number  of  MMIIIs  decrease,  the  combinations  of  BIBs 
and  B-52PBK3  must  increase  to  maintain  the  constant  damage  expectancy. 
Third,  from  both  graphs,  for  a  constant  MMIII  value,  a  decrease  in 
either  the  BIB  or  B-52PEN  warrants  an  increase  in  the  other  to  sustain 
the  constant  damage  expectancy. 

Figures  5.2  thru  5.5  reveals  how  some  informational  analysis  can  be 
extracted  from  the  estimated  equation.  Given  the  ABM  scenario,  the 
figures  explain  the  contribution  of  each  factor  towards  the  response. 
Contribution  is  shown  by  carrier  and  then  by  warhead.  Also,  the 
relative  worth  of  one  system  as  compared  to  others  is  displayed. 

Finally,  graphs  show  what  the  different  combinations  of  weapons  must  be 
to  maintain  constant  damage  expectancy  contour  lines. 

Any  Insight/knowledge  gained  through  informational  analysis  must  be 
tempered  with  the  ABM  scenario,  especially  targeting  strategies  and 
priorities,  because  the  ABM  scenario  affects  the  construction  of  the 
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estimated  model.  If  not,  apparently  misleading  Information  may  be 
extracted  from  the  reduced  estimated  model. 


Conclusion 

This  chapter  explores  the  advantages  of  RSH:  predictability  and 
Informational  analysis.  Predictability  was  actually  shown  In  Chapter 
Pour  under  the  Validation  of  the  Estimated  Model  Step.  Therefore,  this 
chapter  concentrates  on  explaining  how  informational  analysis  is 
performed. 

Usually,  the  full  estimated  model  is  reduced  to  "workable”  terms, 
if  possible.  The  RGRSSION  allows  the  user  to  reduce  the  full  estimated 
model.  Since  orthogonal  designs  are  used  to  gather  information  for 
estimating  the  postulated  model,  the  estimated  model's  coefficients  are 
easily  used  to  illuminate  relationships  between  themselves  and  with  the 
response.  Many  graphs  are  developed  to  show  some  of  the  relationships 
and  how  easily  information  is  garnered  from  them. 

Chapter  Six,  the  next  and  last  chapter,  concludes  this  report  by 
summing  up  the  purpose,  the  product,  and  the  results  of  this  thesis. 
Also,  Chapter  Six  lists  some  observations  noted  during  the  work  of  this 
thesis  and  reports  some  recommendations  for  further  study. 


The  Air  Force  Vide  Mission  Area  Analysis  Division  (AF/XOXR-MAA) 
uses  a  deterministic  model  called  the  Arsenal  Exchange  Model  ( AEM)  to 
evaluate  US  strategic  offensive  capabilities  and  to  answer  "what-lf" 
questions ( 23 : 2 ) .  The  evaluations  and  analyses  are  usually  done  through 
ABM  response  comparisons  of  damage  expectancy.  The  damage  expectancy 
response  Is  calculated  by  the  ABM  through  the  use  of  many  Input  vari¬ 
ables:  weapons  and/or  their  characteristics,  targets  and/or  their 
characteristics,  and  targeting  strategies  and  priorities.  As  the  ABM 
calculates  damage  expectancy,  the  goal  of  the  ABM  is  to  maximize  the 
response. 

There  is  a  need  to  rapidly  answer  predictable  "what-lf"  questions 
about  US  strategic  capabilities  using  the  ABM.  By  conventional  methods 
"what-if"  analysis  or  informational  analysis  with  the  AEM  require  the 
varying  of  one  ABM  parameter  at  a  time  and  then  executing  the  AEM  for 
each  parameter  change.  For  AF/XOXR-MAA,  The  ABM  requires  approximately 
three  hours  for  one  execution  (16).  Consequently,  informational  anal¬ 
ysis  through  conventional  methods  is  very  slow. 

Response  Surface  Methodology  (RSM)  uses  mathematical  and  statis¬ 
tical  techniques  for  analyzing  problems  that  use  many  variables  to 
compute  a  response  and  whose  goal  is  to  maximize  that  response  (20:445) 
A  variation  of  RSM,  Smith's  RSM  variant,  is  RSM  applied  specifically  to 
a  deterministic  model  for  the  purpose  of  facilitating  the  use  of  infor¬ 
mational  analysis  < 26 ; 27 ) .  Given  an  explicit  scenario,  Smith's  RSM 


variant  uses  experimental  designs,  with  the  characteristics  of  ortho¬ 
gonality  and  rotatablllty,  and  multiple  regression  to  capture  the 
responses  of  the  deterministic  model  in  a  carefully  selected  postulated 
model.  Using  a  carefully  selected  postulated  model,  built  from  ortho¬ 
gonal  and  rotatable  experimental  designs,  extensive  informational  anal¬ 
ysis  can  be  easily  performed. 

The  purpose  of  this  thesis  was  to  automate  the  application  of 
Smith's  RSM  variant  to  the  ABM.  The  purpose,  of  course,  is  to  Improve 
AP/XOXR-MAA's  ability  to  perform  informational  analysis  in  real  time. 
Also,  the  ability  to  accurately  predict  the  ABM  and  to  provide  more 
informational  analysis  are  two  other  reasons. 

Conclusions 

The  advantages  of  applying  Smith's  RSM  variant  to  a  deterministic 
model  like  the  ABM  are  accurate  predictions  and  abundant  informational 
analysis  in  real  time.  However,  there  are  other  advantages  and  some 
disadvantages  along  with  some  limitations. 

Predictability.  The  ability  of  the  estimated  model  (postulated 
model  after  its  parameter  coefficients  are  estimated)  to  accurately 
predict  the  ABM  was  shown  in  Chapter  Four  under  the  Estimated  Model 
Validation  Step.  But,  accuracy  is  determined  by  the  user.  The  user 
should  know  within  what  bounds  (standard  deviation)  the  response  of  the 
estimated  model  should  fall  for  the  estimated  model  to  be  proclaimed  as 
accurately  predicting  the  ABM  response. 

From  the  twenty  randomly  chosen  test  points  shown  in  Figure  4.10, 


the  standard  deviation  of  the  estimated  model's  response  was  ♦/-  2.479 
with  a  mean  deviation  of  4-0.164.  Three  test  points  Inflated  the  bounds. 


Without  those  three  test  points,  the  accuracy  of  the  estimated  model 
becomes  much  better  because  the  standard  deviation  of  the  estimated 
model's  response  would  be  +/-  1.318  with  a  mean  deviation  of  -0.551. 


However,  a  user  cannot  arbitrarily  delete  a  test  point  to  Improve 
the  estimated  model's  ability  to  predict  the  aem's  response.  The 
purpose  of  showing  the  improved  statistics  after  deleting  the  three  high 
deviations,  Is  to  demonstrate  that  the  ability  of  the  estimated  model  to 
capture  the  ABH  output  surface  (responses)  fluctuates  over  the  output 
surface.  The  ability  will  be  better  in  some  areas  of  the  surface  and 
worse  in  others.  Therefore,  a  user  should  be  aware  of  what  point  on  the 
output  surface  he/she  is  estimating  a  response  for  and  judge  that 
estimate  with  prior  ABM  output  near  that  point  and/or  with  the  residuals 
calculated  from  nearby  design  points. 

If  a  user  can  accept  the  standard  deviation  of  the  estimated  model, 
then  the  user  gains  the  ability  of  ABM  predictability  in  real  time. 
Instead  of  requiring  three  hours  to  execute  (at  AF/XOXR-HAA),  the  esti¬ 
mated  model  can  predict  the  ABM's  response  within  two  seconds.  This 
advantage  can  be  extremely  valuable  when  an  answer  is  needed  immedi¬ 
ately. 

Informational  Analysis.  The  ability  of  the  estimated  model  to 
allow  informational  analysis  to  be  extracted  quickly  and  more  abundantly 
was  demonstrated  in  Chapter  Five.  Figures  5.2  through  5.5  showed  how 
the  parameter  estimates  of  the  estimated  model  could  be  used  to 
enlighten  the  relationships  between  the  factors  (independent  variables) 
and  the  response  (dependent  variable),  to  clarify  the  relative  worth  of 
each  factor  towards  the  response,  and  to  develop  constant  damage  expec¬ 
tancy  (DB)  contours  given  various  factor  combinations.  However,  the 


usee  was  warned  to  evaluate  any  Informational  analysis  with  regards  to 
the  ASH  scenario,  such  as  targeting  strategies  and  priorities,  to  obtain 
a  more  complete  picture  of  the  information  gained  through  the  analysis. 


Further  Advantages  Plus  Dlsadvantaoes/Llml tat ions.  Taken  from 
Smith  and  Mellichaap,  there  are  some  more  advantages  to  using  Smith's 
RSH  variant  along  with  some  disadvantages  and  limitations  (27:62,83). 
Besides  the  advantage  of  predictability  and  abundant  informational  anal¬ 
ysis  in  real  time.  Smith's  RSH  variant  also  allows  insight  into  the 
deterministic  model  itself  and  can  be  used  with  any  deterministic  model, 
whether  linear  or  nonlinear,  including  optimization  models. 

There  are  three  disadvantages/limitations  to  using  Smith's  RSH 
variant.  First,  Smith's  RSH  variant  is  highly  scenario  dependent.  If  a 
factor  or  the  range  of  a  factor  changes,  the  current  estimated  model 
becomes  invalid.  A  new  estimated  model  would  have  to  be  constructed  to 
accommodate  the  changed  factor  or  range.  Second,  no  extrapolation  can  be 
performed  outside  the  ranges  of  the  estimated  model's  variables. 
Extrapolation  outside  the  factor  ranges  can  lead  to  erroneous  infor¬ 
mation.  Last,  large  numbers  of  the  deterministic  model  executions  are 
required  to  construct  postulated  models  containing  many  variables.  For 
example,  for  this  thesis  it  took  193  AEH  executions  to  obtain  the  neces¬ 
sary  data  for  the  construction  of  the  twelve  variable  postulated  model. 

Observations 

Two  observations  are  noted.  One  occurred  while  building  the  RSHed- 
AEH  program,  and  the  other  after  the  program  was  tested  with  the  appli¬ 
cation  (Chapter  Four).  First,  part  of  building  any  subroutine  or 
section  of  computer  code  that  purports  to  accomplish  some  feat  is  the 


responsibility  of  assuring  the  code  (verifying)  does  accomplish  the 
feat.  All  the  main-menu  subroutines  of  the  RSMed-ASH  program  were 
verified.  The  verification  of  the  RGRSSIOM  subroutine  is  reported  in 
Chapter  Four.  It  Is  from  verifying  the  the  RGRSSIOM  subroutine  that  the 
first  observation  occurred. 

Verification  of  the  RGRSSION  subroutine  meant  insuring  the  RGRSSIOM 
output  was  correct.  The  output  from  the  regression  package  of  SAS  was 
the  absolute  (Appendices  Q  and  R).  Three  sets  of  variables  —  three, 
seven,  and  twelve  --  were  used  in  the  verification  (only  the  twelve 
variable  set  is  reported  in  this  thesis).  While  comparing  the  limited 
regression  output  of  the  RGRSSIOM  subroutine  to  the  corresponding  output 
of  SAS's  regression  package  for  each  set  of  variables,  other  SAS 
regression  statistics,  particularly  those  used  with  stochastic  models, 
were  behaving  as  if  they  could  be  used  with  a  deterministic  model  (e.g., 
mean  square  error  (HSR),  adjusted  Ra,  F-test  for  the  betas  (Is),  and  t- 
tests  for  the  parameter  coefficients).  This  observation  is  important 
because  most  regression  statistics  are  calculated  with  variance 
presupposed,  and  since  deterministic  models  do  not  have  variance,  those 
statistics  are  assumed  not  applicable. 

The  second  observation  was  regretfully  noticed  after  the  test 
application  was  nearly  complete.  In  Chapter  Three,  it  was  assumed  that 
a  B-52  could  not  carry  both  penetrating  bombs  (gravity  and  SRAMs)  and 
ALCMs  at  the  same  time.  This  meant  using  two  design  variables  to 
represent  the  weapons  that  a  B-52  can  carry:  B-52PBN  and  B-52CMC.  The 
maximum  number  of  B-52s  was  set  to  be  156  carriers.  To  Insure  that  the 
max  of  156  B-52s  was  never  exceeded,  the  experimental  design  should 
never  have  a  *1  for  both  design  variables  at  the  same  time.  Unfortu- 


nately,  the  twelve  variable  Box-Behnken  design  does  not  accomplish  this. 
At  the  conclusion  to  the  test  application,  it  was  noticed  that,  at 
times,  when  the  experimental  design  had  both  B-S2  design  variables  coded 
at  *1,  the  ABN  scenario  was  using  a  maximum  of  312  B-52s  instead  of  156. 

BncMBMMkUfloa 

Five  recommendations  for  future  research  are  noted.  First,  the 
RSMed-ASM  program  could  probably  be  written  more  efficiently  than  it 
currently  is.  Second,  other  types  of  postulated  models  could  possibly 
be  used  with  the  ABM.  Third,  a  graphics  subroutine  could  be  written  for 
the  automated  RSMed-ABM  program  that  would  automatically  produce  the 
graphs  of  Chapter  Five.  Fourth,  the  automated  RSHed-ABM  program  could 
be  spliced  with  the  ABN  to  eliminate  the  function  of  Tool  Two.  Fifth, 
and  last,  the  applicability  of  all  regression  statistics  to  determi¬ 
nistic  models  could  be  decided  (refer  to  the  Observations  section  of 
this  chapter). 
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Appendix  Aj.  Box-Behnken  Designs 

Thece  are  ten  Box-Behnken  experimental  designs  ranging  from  three 
to  sixteen  variables  (designs  for  eight,  thirteen,  fourteen,  and  fifteen 
variables  are  not  available).  The  designs  are  taken  from  Box  and 
Behnken's  article  (1).  Bach  Box-Behnken  design  uses  a  certain  code 
scheme.  Each  code  scheme  shows  a  plus  or  a  minus  sign.  The  plus  sign 
corresponds  to  the  high  range  and  the  negative  sign  relates  to  the  low 
range . 

A  code  scheme  Is  shown  first  and  then  those  Box-Behnken  experi¬ 
mental  deslgn(s)  that  use  that  code  scheme  next.  Bach  line  of  an  exper¬ 
imental  design,  except  the  last  line,  shows  which  variables  are  affected 
by  the  code  scheme.  Per  experimental  design  line,  the  values  of  the 
variables  are  changed  for  each  line  of  change  in  the  code  scheme.  The 
last  line  of  each  experimental  design  refers  to  replacing  coding  all 
variables  with  their  medium  values.  The  designs  are  listed  in  ascending 
order : 

Code  Scheme  A: 

+  - 
-  + 

+  + 

For  Three  Variables: 

1  2 

1  3 

2  3 

0  0 


82 


For  Four  variables: 


l  2 

3  4 

1  4 

2  3 

1  3 

2  4 

0  0 

For  Five  Variables: 

1  2 

3  4 

2  5 

1  3 

4  5 

2  3 

1  4 

3  5 

1  5 

2  4 
0  0 


Code  Scheme  B: 


-  ♦  - 
+  +  - 
-  -  + 

♦  -  * 

-  +  + 

+  ♦  + 

For  Six  Variables: 

1  2  4 

2  3  5 

3  4  6 

1  4  5 

2  5  6 

1  3  6 

0  0  0 

For  Seven  Variables 

4  5  6 

16  7 

2  5  7 

1  2  4 

3  4  7 


1  3  5 

2  3  6 

0  0  0 


For  Mine  Variables 

1  4  7 

2  5  8 

3  6  9 

1  2  3 

4  5  6 

7  8  9 

1  5  9 

3  4  8 

2  6  7 

16  8 

2  4  9 

3  5  7 

1  4  7 

2  5  8 

3  6  9 

0  0  0 


Code  Scheme  C: 

+  +  +  + 

4-  4  4  - 
4  4-- 
+  4  -  * 

4  -  -  4 
*  -  f  4 

-  -  4  4 

-  4  4  4 

-  +  +  - 

-  4  -  - 

-  +  -  + 

-  -  -  4 

-  -  4  - 
4  -  4  - 
4  -  -  - 


For  Ten  Variables: 

2  6  7  10 

1  2  5  10 

2  3  7  8 

2  4  6  9 

1  8  9  10 

3  4  5  10 

14  7  8 

3  5  7  9 


W  •As ' -»*  \W 


13  6  9 
4  5  6  8 
0  0  0  0 


For  Twelve  Variables: 


1 

2 

5 

7 

2 

3 

6 

8 

3 

4 

7 

9 

4 

5 

8 

10 

5 

6 

9 

11 

6 

7 

10 

12 

1 

7 

8 

11 

2 

8 

9 

12 

1 

3 

9 

10 

2 

4 

10 

11 

3 

5 

11 

12 

1 

4 

6 

12 

0 

0 

0 

0 

Sixteen  Variables 

1 

2 

6 

9 

3 

4 

8 

11 

5 

10 

13 

14 

7 

12 

15 

16 

2 

3 

7 

10 

1 

4 

5 

12 

6 

11 

14 

15 

8 

9 

13 

16 

2 

5 

6 

13 

4 

7 

8 

15 

1 

9 

10 

14 

3 

11 

12 

16 

3 

6 

7 

14 

1 

5 

8 

16 

2 

10 

11 

15 

4 

9 

12 

13 

1 

3 

13 

15 

2 

4 

14 

16 

5 

7 

9 

11 

6 

8 

10 

12 

4 

6 

10 

16 

3 

5 

9 

15 

1 

7 

11 

13 

2 

8 

12 

14 

0 

0 

0 

0 

Code  Scheae  D: 


y 


microcopy  resolution  test  chart 


- _ .  PHONAL  BURLAU  Of  STANDARDS- 1963-A 


-  +  -  -  - 
♦  ♦  —  + 

+  -  ♦  -  + 

-  ♦  +  -  4- 

+  +  + - 

-  -  -  ♦  - 

♦ - +  + 

-  ♦  -  +  f 
+  ♦-  +  - 
--  +  +  + 

+  -  +  +  - 

-  f  f  +  - 
♦  +  4  +  + 

Poc  Bleven  Variables: 


3  7  8  9  11 

1  4  8  9  10 

2  5  9  10  11 

1  3  6  10  11 

1  2  4  7  11 

1  2  3  5  8 

2  3  4  6  9 

3  4  5  7  10 

4  5  6  8  11 

1  5  6  7  9 

2  6  7  8  10 

0  0  0  0  0 


Appendix  fil  Sis.  R8Hed-ABH  Program 


c  Title 


c  Automation  of  RSM  to  ABH 


Program  RSMedABM 


call  menu 

stop 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

c  Functions  and  Subroutines  c 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Menu 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Purpose:  Subroutine  Menu  controls  branching  within  this  program.  It 

allows  the  user  to  select  what  he/she  wants  to  do.  The  options 
available  are: 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


(I)  Input  Data  —  Input  the  number  of  variables  and  their 

quantities. 

(U)  Build  Uncoded  Design  --  build  the  uncoded  design  that  is 

used  as  input  to  the  ABM. 

(C)  Build  Coded  Design  —  build  coded  design  that  is  used  with 

a  regression  package  to  calculate  the 
regression  equation's  coefficients. 

(R)  Regression  Analysis  --  perform  regression  analysis  on 

the  ABM  output. 


n  n 


«  I  |)  |  .1.  £>  t  ,  f*  '  .  •  1>.  |>.  it,  fl/.  it,  |«,  t  A  M  I  *  fc  >  «  j  «.|  tJI'|  «  f  ,*  t.»  |.t  j.»  g  .»  I*  fat.t.t  t.-  I.  Jj  J* 


c  (D)  Decode  --  decode  the  estimated  regression  equation's 

c  coefficients  calculated  under  (C)  above, 

c 

c  (B)  Exit  —  exit  this  prograa. 

c 

c 

c  Variables: 

c 

c 

character *1  finished, reader, dirction, code 
data  f inlshed/'n'/,  reader/'  '/,  dirction/'  '/ 

c  Begin: 

c 

c 


10  if  (finished  .eq.  * nf )  then 
call  scrlscrn(24) 
print  100 

100  foraat  ('  ************************** 

6  **************************** 
call  scrlscrnd) 

8  8  111 

***• ) 

***  MAIN  MEND  *****', 

print  *,  ' 
call  scrlscrn(l) 

(I) 

input  Data* 

print  *,  ' 
call  scrlscrn(l) 

(U) 

Build  Uncoded  Design 

print  *,  ' 
call  scrlscrn(l) 

(C) 

Build  Coded  Design' 

print  *,  ' 
call  scrlscrnd) 

(R) 

Regression' 

print  *,  • 
call  scrlscrnd) 

(D) 

Decode ' 

print  *,  ' 
call  scrlscrnd) 

(X) 

Execute  Equations' 

print  *,  ' 
call  scrlscrnd) 

print  *,  '  Please  enter  a  letter:  ' 
call  scrlscrnd) 
read  (*,200)  dirction 

200  foraat  (a) 

(B) 

Exit  Prograa' 

if  (dirction  .eq.  'I'  .or.  dirction 
call  InptData 

.eq. 

•  i ' )  then 

else 

if  (dirction  .eq.  'U*  .or.  dirction  .eq.  ' u * )  then 
code  =  'n' 
call  CodeDsgn(code) 
else 

if  (dirction  .eq.  'C'  .or.  dirction  .eq.  ' c * )  then 
code  =  ' y * 
call  CodeDsgn(code ) 
else 

if  (dirction  .eq.  'R'  .or.  dirction  .eq.  * r * )  then 
call  Rgrsslon 
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else 

if  (dicction  .eg.  'D*  .or.  dlrctlon  .eq.  *d * )  then 
call  Decode 
else 

if  (dirction  .eq.  'X*  .or.  dirction  .eq.  'x')  then 
call  Xcuteqns 
else 

if  (dirction  .eq.  'B'  .or.  dirction  .eq.  'e')  then 
finished  =  'y* 
else 

call  scrlscrn(ll) 
print  300 
call  scrlscrn(ll) 
read  (*,200)  reader 
end  if 
end  if 
endif 
end  if 
endif 
endif 
endif 
go  to  10 
endif 

300  foraat  ('  ','Bad  inputlt  Press  "return"  to  try  again:') 
return 
end 
c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  InptData 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Subroutine  InptData  is  the  "controller"  subroutine  for 

entering  all  data  pertaining  to  the  ABM. 

c 

c  Variables: 

c 
c 

c  paraatrs 

c  external 

c 

c  goodchar 

c 

c  exit 

c 
c 
c 

c  getdata 


—  the  nuaber  of  design  paraaters. 

--  flag  that  reflects  whether  or  not  the  paraaeter's  data 
already  resides  on  an  EXTERNAL  data  set. 

--  flag  that  reflects  whether  or  not  user  Input  for  yes-no 
questions  is  an  acceptable  character. 

--  flag  that  allows  the  user  to  exit  this  "aain”  subroutine 
if  there  is  an  unrecoverable  error  or,  indirectly  through 
the  "getdata"  variable,  if  an  experlaental  design  is 
unavailable. 

--  flag  that  allows  the  user  to  input  the  paraaeter's 


A I 


c  characteristics  IE  an  experimental  design  can  be  made  oE 

c  use. 

c 
c 

lnteger*2  paramtrs 
common  /parms/paramtrs 

character  * 1  externa 1 , goodchar ,  ex 1 1 , getdata , code 
c 
c 

c  Begin: 

c 

c 

c  Ask  the  user  IE  he  wishes  to  use  an  outside  source  to  enter  the 

c  number  oE  design  parameters  and  their  characteristics.  Hake  sure 

c  the  user  responds  correctly, 

c 
c 

1  call  ScrlScrn(ll) 

print  *,  'Does  data  already  reside  on  external  data  set?  (y/n)' 
call  ScrlScrn(ll) 
read  (*,2)  external 

2  format  (a) 

call  ChckChar ( external, goodchar ) 

IE  (goodchar  .ne.  * y * )  then 
call  BadChar 
go  to  1 
end  if 
c 


c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 


IE  user  wishes  to  use  external  data,  branch  to  Subroutine  XtrnlDat. 
IE  not,  then  the  user  wishes  to  Input  the  data  via  the  scope. 
Therefore,  start  the  Interactive  input  by  branching  to 
Subroutine  GetParms. 


IE  (external  .eq.  ' y '  .or.  external  .eq.  ' Y* )  then 
call  XtrnlDat(exlt) 
else 

call  GetParms (getdata) 


IE  the  user  has  found  an  adequate  design  for  the  number  of  parameters, 


branch  to  Subroutine  AskPorlt  to  Interactively  input  each  parameter's 


characteristic.  IE  not,  set  the  "exit"  variable  appropriately  to 
exit  this  subroutine  and  back  to  the  Main  Menu. 


if  (getdata  .eq.  'y')  then 
exit  ■  'n' 
call  AskPorlt 
else 

exit  »  'y' 
end  IE 
end  if 
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c  If  there  is  not  an  unrecoverable  error  or  the  user  does  not  wish  to 

c  exit  the  system,  branch  to  Subroutine  VerfyDat  to  allow  the  user  to 

c  verify,  change,  or  correct  each  parameter's  characteristics.  Next, 

c  branch  to  Subroutine  Save It  to  allow  the  user  the  chance  to  save 

c  the  parameter  data, 

c 
c 

if  (exit  .eg.  'n')  then 
call  VerfyDat 
call  Savelt 
end  if 
c 
c 

c  Mission  complete: 

c 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  XtrnlDat(baddata) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Subroutine  XtrnlDat  uses  an  external  data  set  to  enter  the 

c  design  variables'  characteristics, 

c 
c 

c  Variables: 

ccc  COMMON  VARIABLES: 

C 

c 

c  paramtrs  —  the  number  of  design  paramters. 

c  var names  —  the  name  associated  with  each  parameter, 

c  controls  —  the  number  of  ABM  variables  controlled  by  each  design 

c  parameter. 

c  mid  —  mid  point  between  the  low  and  high  value  for  each 

c  parameter. 

c  dlv  —  the  difference  between  the  low  and  mid  points  for  each 

c  parameter  which  is  the  same  as  the  difference  between 

c  the  mid  and  high  points  for  each  parameter, 

c  low  --  the  low  value  for  each  parameter, 

c  high  --  the  high  value  for  each  parameter. 


I 

i 

I 


c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 


baddata  —  a  flag  to  notify  the  Subroutine  inptData  that  the  input 
data  froa  the  external  data  set  is  bad. 
reader  --  this  variable  does  nothing  aore  than  accept  user  "returns” 
or  other  superficial  user  input, 
i  —  a  counter  for  DO  loops. 


integer*2  paraatrs 
coaaon  /paras/paraatrs 
Integer *2  controls (16) 

double  precision  Bld(16),dlv(16),lov(16),hlgh(16) 

coaaon  /uncode/ald,div, low, high, controls 

character *8  varnaaes(16) 

coaaon  /naaes/varnaaes 

character *1  baddata, reader 

lnteger*2  i 


Begin: 


Initialize  the  following  variables  and  open  the  external  file  for 
reading.  If  there  is  an  error  opennlng  the  file,  notify  the  user. 


i  *  0 

baddata  -  'n' 
paraatrs  =  0 

open  (unlt=4,f lle=' varlbles.dat', status=' old', err =8) 


Read  in  the  data  froa  the  external  data  set.  If  an  error  occurs, 
inf ora  the  user  and  exit  this  subroutine. 


1  1  =  1  +  1 

read  (4,2,end=3,err=5)  varnaaes(l),lovd),high(l),controlsd) 
2  foraat  (2X,A8,2X,P7.2,2X,F7.2,2X,I2) 
dlvd)  =  (hlghd)  -  lovd))  /  2.0 
aldd)  =  (lovd)  +  hlgh(l))  /  2.0 
paraatrs  =  paraatrs  +  1 
go  to  1 


Check  the  data  for  logic  error.  Logic  errors  will  occur  if  the 
the  data  is  out  of  range.  IE  there  Is  an  error,  set  the  appropriate 
flag  which  notifies  the  user  of  It. 


* 


3  do  4  1  =  1, paraatrs 


Is  the  nuaber  of  design  parameters  within  range? 


if  (paraatrs  .It.  3  .or.  paraatrs  .gt.  16)  then 
baddata  3  • y • 
end  if 

if  (paraatrs  .eg.  8  .or.  paraatrs  .eg.  13  .or. 

&  paraatrs  .eg.  14  .or.  paraatrs  .eg.  15)  then 
baddata  -  *  y ' 
end  if 


Are  the  low  values  for  each  design  variable  within  range? 


if  (low(l)  .It.  0  .or.  low(l)  .gt.  9999)  then 
baddata  =  ' y  * 
endif 


Are  the  high  values  for  each  design  variable  within  range? 


if  (high(l)  .It.  low(i)  .or.  high(l)  .gt.  9999)  then 
baddata  -  ' y ' 
endif 


Are  the  number  of  ABM  variables  controlled  by  each  design  within  range? 


if  (controls(i)  .It.  1  .or.  controls(i)  .gt.  4)  then 
baddata  3  • y • 
endif 

4  continue 


If  data  is  bad,  infora  the  user  and  insure  the  "baddata”  flag  is  set 
before  exiting  this  subroutine. 


if  (baddata  .eg.  'y')  then 

5  baddata  =  ' y  * 
call  ScrlScrn(ll) 
write  (*,6) 

6  format  ('  There  is  a  problem  with  the  external  input.  Please 
&  'exit  this  program  and'/'  Insure  that  the  input  data  is 

&  'correct.  Press  "return"  to  continue.') 
call  ScrlScrn(lO) 
read  (*,7)  reader 

7  format  (a) 


o  n 


end  If 


c 

c 

c 

c 

c 


c 

c 


Close  the  external  data  set  and  branch  to  the  "subroutine  exit  code". 

closet  4) 
go  to  10 

Error  code  for  openning  the  external  data  set. 


8  call  ScrlScrn(ll) 
write  (*,9) 

9  format  ('  An  error  has  occured  from  trying  to  open  data  set  ', 
*'"Varibles.Dat".  Please  */'  correct  the  problem  or  reenter  ', 
4 'Subroutine  InptData  and  enter  the  data  via  the'/'  scope.  ', 
4'Press  "return"  to  continue.') 

call  ScrlScrn(9) 
read  (*,7)  reader 
baddata  =  • y • 
c 
c 

c  Mission  complete: 

c 

c 

10  return 
end 


c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Subroutine  GetParms(getdata) 


c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  If  the  user  wishes  to  enter  design  variable  Information 

c  via  the  scope,  find  out  first  how  many  design  variables 

c  are  of  Interest, 

c 
c 

c  Variables: 

c 
c 

c  paramtrs 

c  doagaln 

c 
c 
c 

c  getdata 


—  the  number  of  design  paramters. 

--  a  flag  that  relates  the  user's  wish  to  try  another 
experimental  design  if  there  is  no  design,  currently, 
for  the  number  of  design  variables  he/she  is 
interested  in. 

--  a  flag  that  is  sent  back  to  Subroutine  InptData  that 


o  o 


C 
C 

c  coccect 

c 

c  goodchar 

c 
c 
c 

integer*2  paraatrs 
common  /parns/paraatrs 

character *1  doagain, getdata, correct, goodchar 
c 
c 

c  Begin: 

c 

c 

c  Initialize  the  following  variables: 

c 

c 

getdata  =  'y' 
correct  =  'n' 
c 

This  whole  subroutine  is  nothing  aore  than  a  WHILE  loop.  The  loop  will 
c  continue  until  the  user  deteralnes  whether  or  not  he/she  can  use  what 

c  design  variable  parameters  are  available, 

c 
c 

1  if  (correct  .eq.  'n'  .or.  correct  .eq.  'H')  then 
c 

c 

c  Allow  the  user  to  input  the  number  of  design  variables  of  interest, 

c  Check  for  input  error  and  then  initialize  the  "doagain"  variable, 

c 
c 

call  ScrlScrn(ll) 

print  *,  '  How  aany  variables  are  there?  (Hax  of  16)' 
call  ScrlScrn(ll) 
read  (*,*,err=7)  paraatrs 
call  ScrlScrn(24) 
doagain  =  'y' 
c 
c 

c  If  the  nuaber  entered  by  the  user  Is  not  within  bounds.  Inf ora  the 

c  user  and  check  whether  or  not  the  user  wishes  to  try  another  design, 

c  Check  the  user's  input  for  the  correct  possible  characters  and  allow 

c  the  user  to  re-answer  If  he/she  made  an  input  mistake.  If  the  user 

c  wishes  to  retry,  allow  hia/her  to  reenter  the  value  for  the  design 

c  variable  parameter.  If  not,  set  the  appropriate  flag  to  exit  this 

c  subroutine, 

c 
c 

2  If  (paraatrs  .It.  3  .or.  paraatrs  .gt.  16)  then 
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relates  whether  or  not  the  user  found  an  appropriate 
design  nuaber  parameter. 

--  a  fall-safe  flag  to  Insure  the  user  is  satisfied  with 
his/her  choice  for  the  design  variable  parameter. 

--  flag  that  reflects  whether  or  not  user  input  for  yes-no 
questions  is  an  acceptable  character. 


print  3 

format  ('  Value  has  to  be  between  3  and  16,  inclusively!!  ', 

'Do  you  wish  to  retry?  ( y/n ) • ) 

call  ScrlScrn(ll) 

read  (*,4)  doagaln 

foraat  (a) 

call  ChckChar( doagaln, goodchar ) 
if  (goodchar  .ne.  'y')  then 
call  BadChar 
go  to  2 
end  If 
else 


If  the  user's  value  for  the  design  variable  parameter  is  within  range, 
■take  sure  his/her  value  is  for  one  of  the  experiaental  designs  that  is 
currently  available.  If  it  isn't,  again  allow  the  user  to  retry  if 
he/she  wishes  while  checking  his/her  input  for  the  correct  possible 
character . 


if  (paraatrs  .eg.  8  .or.  paraatrs  .eq.  13  .or. 
paraatrs  .eq.  14  .or.  paraatrs  .eq.  15)  then 
print  5,  paraatrs 

foraat  ('  Sorry,  this  prograa  currently  has  no  experiaental' 
'  design  for  ',12,'  paraaters. '/'  Do  you  wish  to' 

•  reenter  another  value  for  paraaeters?  (y/n)') 
call  ScrlScrn(lO) 
read  (A,4)  doagaln 
call  chckchar( doagaln, goodchar) 
if  (goodchar  .ne.  ' y ' )  then 
call  BadChar 
go  to  2 
end  if 
else 


If  the  user  got  by  the  first  two  checks,  aake  sure  that  he/she  is 
satisfied  with  the  selection.  Check  his/her  answer  for  error.  If 
the  user  likes  what  he/she  has,  set  the  appropriate  flag  to  exit  this 
subroutine.  If  not,  allow  the  user  to  reenter  by  again  setting  the 
appropriate  flag. 


print  6,  paraatrs 

foraat  ('  Is  paraaeters  =  ',12,'  correct?  (y/n)') 
call  ScrlScrn(ll) 
read  (*,4)  correct 
call  ChckChar( correct, goodchar ) 
if  (goodchar  .ne.  'y')  then 
call  BadChar 
go  to  2 
end  if 
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end  If 
end  if 
c 
c 

c  Allow  the  user  to  retry  if  he/she  wishes  to  do  so  after  failing  the 

c  bounds  and  designs  available  checks.  If  the  user  did  not  wlsht  to 

c  retry,  set  the  appropriate  flag  and  exit  this  subroutine, 

c 
c 

if  (doagain  .eq.  'y'  .or.  doagain  .eq.  * Y * )  then 
go  to  1 
else 

getdata  =  'n' 
end  if 
c 
c 

c  End  WHILE  loop  and  branch  to  subroutine  exit  code. 

c 

c 

end  if 
go  to  8 
c 
c 

c  Error  code  branching. 

c 

c 

7  call  Badlnput 
go  to  1 

c 

c 

c  Mission  accomplished: 

c 

c 

8  return 
end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  AskForlt 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Subroutine  AskForlt  Interactively  queries  the  user  for 

c  each  design  variable's  characteristics  (l.e.,  name,  low 

c  and  high  values,  and  the  number  of  ABM  variables  controlled, 

c 
c 

c  Variables: 

c 

c 
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ccc  COMMON  VARIABLES  --  refer  to  Subroutine  XtrnlDat  for  the  definitions 
c  of  the  "common"  variables. 

c  reader  —  this  variable  does  nothing  more  than  accept  user  "returns" 

c  or  other  superficial  user  input, 

c  1  —  a  counter  for  DO  loops, 

c 
c 

integer*2  paramtrs 
common  /parms/paramtrs 
character *8  varnanes(16) 
conaon  /names/varnames 
integer*2  controls (16) 

double  precision  mid(16),dlvd6),  low(16),hlgh(16) 
common  /uncode/mid, dlv, lov,high, controls 
character *1  reader 
integer*2  i 
c 
c 

c  Begin: 

c 

c 

c  Before  obtaining  each  design  variable's  characteristics  give  the 

c  user  som  instructions  on  how  to  input  the  data, 

c 
c 

call  ScrlScrn(5) 
print  1 

1  format  ('  The  following  set  of  questions  will  ask  you  for', 

4'  the  varlable"s  name,  its  *,/, 

&'  low  and  high  values,  and  the  number  of  ABM  input  variables  ', 

4' it  controls.  The  ',/, 

4'  limit  to  each  variable"s  characteristic  is:',///, 

4'  Name  --  up  to  eight  characters',//, 

4'  Low  Value  --  up  to  a  value  of  9999',//, 

4'  High  Value  --  up  to  a  value  of  9999',//, 

4'  Number  of  AEM  Input',/, 

4'  Variables  Controlled  —  up  to  a  value  of  4',///, 

4'  When  you  are  ready  to  continue,  press  "return"  :') 
call  ScrlScrn(3) 
read  (*,2)  reader 

2  format  (a) 
c 

c 

c  Obtain  each  design  variable's  name,  low  and  high  value,  and  the 

c  number  of  ABM  input  variables  it  controls, 

c 
c 

do  14  1  =  1, paramtrs 
c 
c 

c  What  is  the  name  associated  with  this  design  variable? 

c 

c 


98 


call  scrlscrndl) 

print  3,  i 

format  ('  What  is  the  name  for  variable  ',12,'?') 

call  ScrlScrn(ll) 

read  (*,4),  varnames(i) 

format  (a8) 


What  is  the  low  value  for  this  design  variable?  Check  for  input 
error  and  insure  the  low  value  is  not  less  than  zero.  If  either 
happens,  let  the  user  reenter  the  value. 


call  ScrlScrn(ll) 
print  6,  varnames(i) 

format  (’  What  is  the  low  value  for  variable 
call  ScrlScrn(ll) 
read  (*,*,err=15)  low(i) 
if  (low(l)  .It.  0)  then 
call  ScrlScrn(ll) 
print  7 

format  ('  Low  value  cannot  be  less  than  zero!!  Press 
'"return"  and  try  again.') 
call  ScrlScrn(ll) 
read  (*,2)  reader 
go  to  5 
end  if 


What  is  the  high  value  for  this  design  variable?  Check  for  input 
error  and  insure  the  high  value  is  not  less  than  the  low  value. 

If  either  happens,  let  the  user  reenter  the  value. 


call  ScrlScrn(ll) 
print  9,  varnames(i) 

format  ('  What  is  the  high  value  for  variable  " ' ,a8, ' "? ' ) 
call  ScrlScrn(ll) 
read  (*,*,err=16)  high(i) 
if  (high( i )  .It.  low(i))  then 
call  ScrlScrn(ll) 
print  10 

format  ('  High  value  cannot  be  less  than  low  value!!  ' 
'Press  "return"  and  try  again.') 
call  ScrlScrn(ll) 
read  (*,2)  reader 
go  to  8 
end  if 


How  many  ASM  variables  are  controlled  by  this  design  variable. 
Again,  check  for  input  error  and  insure  the  that  the  value  entered 
is  within  the  bounds.  If  input  is  bad,  allow  the  user  to  reenter 


o  o 
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c  the  value. 

c 

c 

11  call  ScrlScrn(ll) 
print  12,  varnames(l) 

12  format  ('  How  many  ABM  input  variables  does  variable  "',a8, 
a  '"  control?' ) 

call  ScrlScrn(ll) 

read  (*  ,*  ,ezt~n)  controls(i) 

if  (controls(l)  .It.  1  .or.  controls(l)  .gt.  4)  then 
call  ScrlScrn(ll) 
print  13 

13  format  ('  Value  has  to  be  between  1  and  4  inclusively!! 

&  'Press  "return"  and  try  again.') 

call  ScrlScrn(ll) 
read  (*,2)  reader 
go  to  11 
end  if 
c 
c 

c  Compute  the  "mid"  and  "div"  values  for  each  design  variable.  The 

c  "mid”  and  "dlv"  points  are  used  for  obtaining  the  coded  variables 

c  In  the  experimental  design  section  of  this  program, 

c 
c 

dlv(l)  =  ( high ( i )  -  low(l))  /  2.0 
mld(l)  =  lov(l)  *  dlv(l) 

14  continue 


c  Branch  to  subroutine  exit  code. 

c 

c 

go  to  18 
c 
c 

c  Error  checking  code. 

c 

c 

15  call  Badlnput 
go  to  S 

16  call  Badlnput 
go  to  8 

17  call  Badlnput 
go  to  11 

c 

c 

c  Beam  me  up,  Scott le. 

c 

c 

18  return 
end 

c 

100 


O  fi 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  VerfyDat 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Subroutine  VerfyDat  allows  the  user  to  verify,  Modify,  or 

c  change  each  parameter's  characteristics, 

c 
c 

c  Variables: 

c 

c 

ccc  COMMON  VARIABLES  —  refer  to  Subroutine  XtrnlDat  for  the  definitions 

of  the  "common"  variables. 

chngdata  --  flag  that  controls  when  the  user  wants  to  modify  parameter 
c  characteristics. 

c  correct  —  flag  that  controls  when  the  user  is  through  with  this 

c  subroutine. 

c  reader  —  this  variable  does  nothing  more  than  accept  user  "returns" 

c  or  other  superficial  user  input. 

c  goodchar  —  flag  that  reflects  whether  or  not  user  input  for  yes-no 

c  questions  is  an  acceptable  character, 

c 
c 

integer*2  paramtrs 
common  /parms/paramtrs 
character *8  varnames(16) 
common  /names/varnames 
integer *2  controls (16) 

double  precision  mld(16),dlv(16),low(16),high(16) 
common  /uncode/mid, dlv, low, high, controls 
double  precision  newvalue 
lnteger*2  l,j 

character *1  chngdata, correct, reader, goodchar 
character's  newvarnm 
c 
c 

c  Begin: 

c 

c 

c  Initialize  the  following  variables: 

c 

c 

chngdata  =  'n' 
correct  =  'n' 
c 
c 

c  This  whole  subroutine  is  nothing  more  than  a  WHILE  loop.  If  data  is 

c  not  correct,  as  it  is  assumed  not  to  be  when  the  loop  is  first  entered, 


the  user  Is  shown  his/her  data  and  queried  If  It  Is  correct  or  not.  I 
user  accepts  It,  the  loop  and  thus  this  subroutine  Is  exited,  else  the 
user  Is  allowed  to  aodlfy  his/her  data. 

1  if  (correct  .eq.  'n'  .or.  correct  .eq.  ' M ' )  then 

2  call  InpTable 


If  the  user  wants  to  change  the  Input,  ask  for  which  row  and  coluan 
the  bad  data  Is  located  on  and  then  for  the  new  value.  Check  the 
user's  Input  for  validity  and  allow  hia/her  to  reenter  If  necessary. 


If  (chngdata  .eq.  * y * )  then 


Which  row?  Hake  sure  user  input  Is  within  range. 


print  •,  '  Which  row  Is  the  bad  data  located  on?  1 
read  (*,*,err=15)  1 

if  (1  .It.  1  .or.  i  . gt.  paraatrs)  then 
call  ScrlScrn(ll) 
print  3,  paraatrs 

3  foraat  ('  Bad  Input!!  Rows  range  froa  1  to  ',12, 

&  '.  Press  "return"  to  retry.') 

call  ScrlScrn(ll) 
read  (*,4)  reader 

4  foraat  (a) 
go  to  2 

end  If 


Which  coluan?  Hake  sure  user  Inputs  within  the  correct  range. 


5  call  InpTable 

print  *,  '  Which  coluan  Is  the  bad  data  located  on?  ' 
read  (*,*,err=16)  J 
If  (j  .It.  1  .or.  j  .gt.  4)  then 
call  ScrlScrn(ll) 
print  6 

6  foraat  ('  Bad  Input!!  Coluans  range  froa  1  to  4.  Press' 
t  '  return  to  retry.') 

call  ScrlScrn(ll) 
read  (f,4)  reader 
go  to  5 
end  If 


Receive  the  new  value  froa  the  user  and  check  it  for  error.  Allow 
the  user  to  reenter  the  data  If  not  entered  correctly. 


call  InpTable 

print  *,  '  What  is  the  new  value?  ' 


Change  the  "naae"  of  the  variable. 


if  (j  .eq.  1)  then 
read  (*,8)/  newvarna 
foraat  (a8) 

varnaaes(l)  =  newvarna 
else 


Change  either  the  low,  high,  or  the  nuaber  of  ABH  variables 
controlled  by  the  design  variable.  Check  user  input  for  error. 
If  error  occurs,  allow  the  user  to  reenter. 


read  (*,*,err=17),  newvalue 


Change  the  low  value. 


if  (j  .eq.  2)  then 


Do  not  allow  the  low  value  to  be  less  than  zero.  If  it  is  reenter, 
else  accoaplish  the  change. 


if  (newvalue  .It.  0)  then 
call  ScrlScrn(ll) 
print  9 

foraat  ('  Low  value  cannot  be  less  than  zero!!  Press 
'"return"  and  try  again.') 
call  ScrlScrn(ll) 
read  (*,4)  reader 
go  to  7 
else 

low(l)  =  newvalue 
dlv(l)  =  (hlgh(l)  -  low(i))  /  2.0 
ald(l)  =  low(l)  ♦  div(l) 
end  If 
end  if 


Change  the  high  value. 


it  (j  .eq.  3)  then 


Do  not  allow  the  high  value  to  be  less  than  the  variables  low  value. 
I£  it  is  reenter;  else  accomplish  the  change. 


if  (newvalue  .It.  low(i))  then 
call  ScrlScrn(ll) 
print  10 

format  ('  High  value  cannot  be  less  than  low  value!!  ', 
'Press  "return”  and  try  again.') 
call  ScrlScrn(ll) 
read  (*,4)  reader 
go  to  7 
else 

high(l)  =  newvalue 
dlv(l)  =  (high(l)  -  low( i ) )  /  2.0 
mld(i)  =  low(l)  ♦  div(i) 
end  if 
end  if 


Change  the  number  of  AEM  variables  controlled  by  the  design  variable. 


if  (j  .eq.  4)  then 


Value  has  to  be  between  the  numbers  1  and  4  inclusively.  If  not, 
allow  the  user  to  reenter;  else,  accomplish  the  change. 


if  (newvalue  .It.  1  .or.  newvalue  .gt.  4)  then 
call  ScrlScrn(ll) 
print  12 

format  ('  Value  has  to  be  between  1  and  4  inclusively!' 
'  Press  "return"  and  try  again.') 
call  ScrlScrn(ll) 
read  (*,4)  reader 
go  to  7 
else 

controls(i)  =  lnt( newvalue) 
end  if 
end  if 
endlf 


Change  the  "chngdata"  flag  back  to  "no"  after  the  user  has  changed 
the  data.  This  allows  the  recently  modified  input  data  to  be  shown 
before,  if  necessary,  any  further  changes  are  entered. 


chngdata  =  ' n ' 
else 


Show  the  user  his/her  Input  and  ask  if  it  is  correct.  This  allows 
the  user  to  Modify  or  change  the  data  if  he/she  wants  to.  Hake 
sure  the  user  inputs  the  correct  answer. 


13  print  14 

14  format  (/'  Is  the  input  to  all  variables  correct?  (y/n)') 
read  (*,4)  correct 

call  ChckChar( correct, goodchar) 
if  (goodchar  .ne.  * y *  >  then 
call  BadChar 
call  InpTable 
jO  to  13 
end  if 


If  data  is  not  correct,  set  the  "chngdata”  flag  to  allow  the  user 
to  change  it. 


if  (correct  .eq.  'n'  .or.  correct  .eq.  ' H ' )  then 
chngdata  *  'y* 
end  if 
end  if 
go  to  1 


Bnd  WHILE  loop. 


endlf 


Branch  to  end  of  this  subroutine. 


go  to  18 


The  following  are  the  error  branching  calls  Bade  froa  the  preceedlng 
"read"  stateaents  that  "read- in”  user  input. 


15  call  Badlnput 
go  to  2 

16  call  Badlnput 
go  to  5 

17  call  Badlnput 


|  *„■  r  J  I  *  .  ,  k  »  t  »  «U  «1|  d>*  »U  ,♦§  ^tt*. 


Mission  complete: 


return 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Savelt 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Allow  the  user  to  save  his/her  input  if  so  desired. 


Variables: 


COMMON  VARIABLES  --  refer  to  Subroutine  XtrnlDat  for  the  definitions 
of  the  "common”  variables. 

save  —  a  flag  that  reflects  the  user's  desire  to  save  his/her 
data  on  an  externa  file. 

retry  —  a  flag  that  reflects  the  user's  desire  to  try  and  save 
his/her  data  after  an  error  has  occured  from  trying  to 
open  the  external  data  set.  It  is  assumed  that  the  user 
can  correct  the  problem  outside  this  program  without 
having  to  exit  this  program,  thereby  losing  all  data. 

reader  --  this  variable  does  nothing  more  than  accept  user  "returns' 
or  other  superficial  user  input. 

goodchar  —  flag  that  reflects  whether  or  not  user  input  for  yes-no 
questions  is  an  acceptable  character. 

1  --  a  counter  for  DO  loops. 


lnteger*2  paramtrs 
common  /parms/paramtrs 
character *8  varnames(16) 
common  /names/varnames 
integer42  controls! 16) 

double  precision  mld(16),dlv<16),low(16),high(16) 
common  /uncode/mid, dlv, low, high, controls 
character*!  save, retry, reader , goodchar 
integer*2  l 


Begin: 


-  .v  .  ,\  . 


u  u 
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c  write  the  value  of  the  variables  'paraatrs'  and  'varnaaes'  to  an 

c  external  data  set  to  be  used  with  the  RGRSSIOM  subroutine, 

c 
c 

open  (unit=2,naae='rgr33ion.in',statu3='old' ) 
open  (unlt=3,naae='decode.ln',status='old' ) 
open  (unlt=4,naae='codedsgn.in',statU3='old' ) 
write  (2/13)  paraatrs 
mite  (4/13)  paraatrs 
do  14  1  =  1/ paraatrs 
write  (2,15)  varnaaes(i) 

write  (3/16)  varnaaes(l),low(i),hlgh(l),aid(l)/dlv(l) 
write  (4,17)  low(l)/Bid(l),high(l),controls(l) 

14  continue 

13  foraat  ('  ',12) 

15  foraat  ('  ' ,A8) 

16  foraat  ('  ,,A8,2(1X,P7.2),2(1X,P11.6)) 

17  foraat  ('  ' ,3(1X/P7.2),1X, ID 
close  (2) 

close  (3) 
close  (4) 


c  Plnd  out  if  the  user  would  like  to  save  his/her  data.  Hake  sure 

c  the  user  Inputs  one  of  the  possible  answers, 

c 
c 

1  call  ScrlScrn(ll) 
write  (*,2) 

2  foraat  ('  Do  you  wish  to  save  your  input  (y/n)?  If  so,  the  data', 
4'  Is  written  to  file'/'  "varlbles.dat".  Consequently,  any  ', 

4 'data  already  in  that  file  is  written  over.'/'  Input  (y/n):') 
call  ScrlScrnO) 
read  (*,3)  save 

3  foraat  (a) 

call  ChckChar (save,goodchar ) 
if  (goodchar  .ne.  1 y ' )  then 
call  BadChar 
go  to  1 
end  if 
c 
c 

c  If  the  user  wants  to  save  his/her  data,  open  the  file  and  write 

c  the  data  to  it.  Check  for  errors  froa  opennlng  the  file  and  froa 

c  writing  the  data  to  it.  When  finished,  close  the  file, 

c 
c 

if  (save  .eq.  'y*  .or.  save  .eq.  • Y * )  then 
open  (unit*4,f ile*' varlbles.dat ', status* 'old', err »7) 
do  5  1  =  1, paraatrs 

write  (4,4,err*10)  varnaaes(l),low(i),hlgh(l),controls(l) 

4  foraat  <2X,A8,2X,P7.2,2X,P7.2,2X,I2) 

5  continue 


6  closet  4) 
end  if 


Check  out  of  this  place. 


go  to  12 


Error  checking  code: 


If  there  Is  a  problem  openning  the  external  data  set,  notify  the 
user  and  see  if  he  wants  to  retry.  Check  his  input  for  error  and 
allow  him/her  to  reenter  his/her  answer  if  there  is  an  error. 


7  call  ScrlScrn(ll) 
write  (*,8) 

8  format  ('  There  is  a  problem  openning  data  set  "varlbles.dat". ', 
8/'  Can  you  correct  and  retry?  (y/n):*) 

call  ScrlScrn(lO) 
read  (*,3)  retry 
call  ChckChar ( retry, goodchar) 
if  (goodchar  .ne.  *y')  then 
call  BadChar 
go  to  7 
end  if 


If  the  user  wants  to  retry,  allow  him/her  to  do  so.  However,  it 
is  assumed  that  before  the  retry,  the  user  will  correct  the  problem 
outside  of  this  program.  If  the  user  does  not  wish  to  retry,  inform 
him/her  of  the  data  loss  and  exit  this  subroutine. 


if  (retry  .eq.  'y'  .or.  retry  .eq.  'Y')  then 
go  to  1 
else 

call  ScrlScrn(lO) 
write  (*,9) 

9  format  ('  Data  was  not  saved  unless  it  previously  resided  on', 
C  '  the  external  data  set.'/'  Press  "return"  to  continue.') 
call  ScrlScrn(ll) 
read  (*,3)  reader 
go  to  12 
end  if 


This  error  checking  code  Informs  the  user  that  an  error  occured 
while  trying  to  write  the  data  to  the  external  data  set.  The 
file  is  closed  and  then  this  subroutine  is  then  exited. 


o  n 


10  call  ScrlScrn(lO) 
write  (*,11) 

11  format  ('  An  error  has  occured  from  trying  to  write  the  data  to', 
a*  the  external  data  set.1/1  Data  can  not  be  saved!!!  Examine  ' , 

4'the  external  data  set  for  possible  clues.'/'  Press', 

4'  "return"  to  continue.') 
call  ScrlScrn(lO) 
read  (*,3)  reader 
go  to  6 
c 
c 

c  Finished;  Capice!!! 

c 

c 

12  return 
end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  ScrlScrn(scrllnes) 

c  c 

ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Subroutine  ScrlScrn  scrolls  the  terminal  screen  by  rolling 

c  24  lines  across  it. 

c 
c 

c  Variables: 

c 

c 

cl  —  counter  for  DO  loop 

c  scrlines  --  number  of  lines  to  scroll 

c 
c 

integer*2  1, scrlines 

c  Begin: 

c 

c 

c  Scroll  the  number  of  times  as  dictated  by  the  passed  parameter. 

c 

c 

if  (scrlines  .gt.  0)  then 
do  1  1  -  1, scrlines 
print  *,  '  ' 

1  continue 
end  if 


o  o  n  o  o  o  n 


return 

end 


c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  ChckChar (varlble, goodchar ) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Purpose:  Subroutine  ChckChar  evaluates  whether  or  not  the  passed 
parameter  avarlblea,s  value  Is  one  of  four  possible 
characters.  The  passing  subroutine  Is  Informed  of  the 
results  of  the  evaluation. 


c 

c  Variables: 

c 

c 

c  varlble  —  contains  the  value  passed  by  the  Inquisitive  subroutine 

c  goodchar  —  flag  that  reflects  whether  or  not  user  Input  for  yes-no 

c  questions  Is  an  acceptable  character, 

c 
c 

character*!  varlble, goodchar 
c 
c 

c  Begin: 

c 

c 

c  Bvaluate  the  passed  paraaeter  and  set  "results"  flag,  "goodchar", 

c  to  the  appropriate  value, 

c 
c 

If  (varlble  .eq.  ’y*  .or.  varlble  .eq.  * Y • )  then 
goodchar  =  *  y  * 
else 

If  (varlble  .eq.  'n'  .or.  varlble  .eq.  'N')  then 
goodchar  =  *y' 
else 

goodchar  *  'n' 
end  If 
end  if 
c 
c 

c  Leave  this  tiny  subroutine: 

c 

c 

return 

end 


o  o  o  n  o  n  o 


c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  BadChar 

c  c 

ccccccccc ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Inform  the  user  that  he/she  input  the  vronge  character. 

c 

c 

c  Variables: 

c 

c 

character‘1  reader 
c 
c 

c  Begin: 

c 

c 

call  ScrlScrn(24) 
print  1 

1  format  ('  Vronge  character! !!  Press  "return"  to  try  again.1) 
call  ScrlScrn(ll) 

read  (*,2)  reader 

2  format  (a) 
return 
end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Bad Input 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Purpose : 

Variables: 
c 

c  reader  —  this  variable  does  nothing  more  than  accept  user  "returns" 

c  or  other  superficial  user  input, 

c 
c 

character*!  reader 
c 


c  Inform  the  user  of  his/her  blunder  and  then  await  his/her 

c  understanding  nod. 

c 
c 

call  ScrlScrn(ll) 
print  1 

1  format  ('  Bad  data:  Either  value  entered  was  too  large  or  non-', 
('numeric!!!  Press  "return"',/,'  and  try  again.') 

call  ScrlScrn(lO) 
read  (*,2)  reader 

2  format  (a) 
c 

c 

c  I'm  out  of  here: 

c 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  InpTable 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  subroutine  InpTable  shows  the  user  each  design  variable's 

c  characteristic  In  a  formatted  style, 

c 
c 

c  Variables: 

c 

c 

ccc  COMMON  VARIABLES  —  refer  to  Subroutine  XtrnlDat  for  the  definitions 
c  of  the  "common"  variables, 

c  1  —  a  counter  for  DO  loops, 

c 
c 

integer*2  paramtrs 
common  /parms/paramtrs 
Integer *2  controls (16) 

double  precision  mld(16),dlv(16),low(16),hlgh(16) 
common  /uncode/mld, dlv, low, high, controls 
character^  varnames(16) 
common  /names/varnames 
Integer  1 


I  c 

c 

c  Show  the  user  his/her  input. 

c 

c 

call  ScrlScrn(24) 
print  1 

1  format  ('  Your  input  for  each  variable  is:1// 

£5X, ' Variable 13X, 'Range', 20X, ’Number  Of  ABM1/ 

&20X, 'Low' , 10X, 'High' ,  7X, 'Input  Variables  Controlled'/) 
do  3  l  =  l,paramtrs 

print  2,  varnames(l),lov(l),high(l),controls(i) 

|  2  format  (5X, A8,5X,P7.2,7X,F7.2,17X,I2) 

s  3  continue 

> 

c 

c 

c  Bye,  Bye,  Love: 

i  c 

i 

.  c 

[  return 

|  end 

c 

'  c 

!  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  CodeDsgn(code ) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 
c 

c  Variables: 

c 
c 

real  dsgnmtrx(385,64) 
common  /dsgnmtrx/dsgnmtrx 
integer*2  paramtrs, controls (16) 
double  precision  low(16),mid(16),hlgh(16) 
common  /uncode/paramtrs, low, mid, high, controls 
Integer *2  features(3:16,3) 
common  /features/features 
character*!  code 
integer*2  i, j,totlrows,totlcols 

data  features/  3,  6,10,  6,  7,  0,15,10,11,12,  0,  0,  0,24, 

£  4,  4,  4,  8,  8,  0,  8,16,16,16,  0,  0,  0,16, 

£  2,  2,  2,  3,  3,  0,  3,  4,  4,  4,  0,  0,  0,  4/ 

c 

c  Begin: 

c 
c 

113 


k  ■  •- 


vrv 


open  (unlt=4,naae='codedsgn. In  * ,statu3='oid' ) 
read  (4/375),  parantzs 
do  3  l  =  l,paraatrs 

read  (4,400)  low(l),aid(i),high(i),controls(l) 

3  continue 
close  (4) 

l£  (code  .eq.  * y * )  then 
open(unit=7,£lle='dsgnBtrx. in' ,status='old' ) 
else 

open(unit=8,f lle='aea.dat' ,status='old' ) 
end  if 

call  Setup 

call  Design3(code) 

totlrows  =  £eatures(paramtrs,l)*£eatures(paraatrs,2)  +  1 
do  1  l  =  1, pa cant t 3 

totlcols  =  totlcols  +  controls(i) 

1  continue 

if  (code  .eq.  'y')  then 

write  (7,325)  features (paraatrs,l), features! paraatrs, 2) 
end  if 

do  7  i  =  1, totlrows 

if  (code  .eq.  * y * )  then 

write  (7,300),  (dsgnatrxt i, j ) ,  j  =  l,paraatrs) 
else 

write  (8,350),  (dsgnatrx( i, j ) ,  j  =  1, totlcols) 
end  if 

7  continue 

if  (code  .eq.  ' y ' )  then 
close(7) 
else 

close(8) 
end  if 

300  foraat  ('  • ,16(F4.1,1X) ) 

325  foraat  ('  ',2(12, IX)) 

350  foraat  ('  ’,64(P7.2,1X) ) 

375  foraat  ('  ',12) 

400  foraat  ('  ',3(1X,F7.2),1X,I1) 

return 
end 
c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Setup 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 
c 
c 


Variables: 


character *1  dsgncode(2:5,16,5) 

Integer *2  dsgnabrs(3:16,24,5) 
coHon  /aspects/dsgncode,dsgnabrs 
lnteger‘2  j,k 
integer*2  dsgn«br 3 ( 3, 2 ) 
lnteger*2  dsgnabr4(6,2) 
integer*2  dsgnabr5(10,2) 

Integer *2  dsgn«br6(6,3) 
lnteger*2  dsgn«br7(7, 3) 

Integer *2  dsgn»br9(15,3) 

integer*2  dsgnnbra(10,4) 

lnteger*2  dsgnabrb(ll,5) 

integer *2  dsgn»brc(12,4) 

integer#2  dsgnabrg(24,4) 

character*!  dsgncde2( 4,2) 

character *1  dsgncde3(8,3) 

character #1  dsgncde4(16,4) 

character*!  dsgn5frc( 16, 5) 

data  dsgnabr3/  1,  1,  2, 

i  2,  3,  3/ 

data  dsgnnbr4/  1,  3,  1,  2,  1,  2, 

k  2,  4,  4,  3,  3,  4/ 

data  dsgnabrS/  1,  3,  2,  1,  4,  2,  1,  3,  1,  2, 

i  2,  4,  5,  3,  5,  3,  4,  5,  5,  4/ 

data  dsgnabr6/  1,  2,  3,  1,  2,  1, 

i  2,  3,  4,  4,  5,  3, 

i  4,  5,  6,  5,  6,  6/ 

data  dsgn*br7/  4,  1,  2,  1,  3,  1,  2, 

1  5,  6,  5,  2,  4,  3,  3, 

.  6,  7,  7,  4,  7,  5,  6/ 

data  dsgnabrS/  1,  2,  3,  1,  4,  7,  1,  3,  2,  1,  2,  3,  1,  2,  3, 

1  4,  5,  6,  2,  5,  8,  5,  4,  6,  6,  4,  5,  4,  5,  6, 

i  7,  8,  9,  3,  6,  9,  9,  8,  7,  8,  9,  7,  7,  8,  9/ 

data  dsgnabra/  2,  1,  2,  2,  1,  3,  L,  3,  1,  4, 

5,  2,  3,  4,  8,  4,  4,  5,  3,  5, 

7,  5,  7,  6,  9,  5,  7,  7,  6,  6, 

10,10,  8,  9,10,10,  8,  9,  9,  8/ 
data  dsgnabrb/  3,  1,  2,  1,  1,  1,  2,  3,  4,  1,  2, 

7,  4,  5,  3,  2,  2,  3,  4,  5,  5,  6, 

8,  8,  9,  6,  4,  3,  4,  5,  6,  6,  7, 

9,  9,10,10,  7,  5,  6,  7,  8,  7,  8, 
11,10,11,11,11,  8,  9,10,11,  9,10/ 

data  dsgnabrc/  1,  2,  3,  4,  5,  6,  1,  2,  1,  2,  3,  1, 

k  2,  3,  4,  5,  6,  7,  7,  8,  3,  4,  5,  4, 

i  5,  6,  7,  8,  9,10,  8,  9,  9,10,11,  6, 

1  7,  8,  9,10,11,12,11,12,10,11,12,12/ 

data  dsgnabrg/  1,  3,  5,  7,  2,  1,  6,  8,  2,  4,  1,  3,  3,  1,  2,  4 

i  1,  2,  5,  6,  4,  3,  1,  2, 

i  2,  4,10,12,  3,  4,11,  9,  5,  7,  9,11,  6,  5,10,  9 

■  3,  4,  7,  8,  6,  5,  7,  8, 

I  6,  8,13,15,  7,  5,14,13,  6,  8,10,12,  7,  8,11,12 


data  dsgncde2/ 

1 

data  dsgncde3/ 


data  dsgncdel/ 


14,  * 
11,14 
16,11 


data  dsgncdel/ 


data  dsgn5frc/ 


10,10,  9,11 
16,10,12,15 
12,16,15,13 
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T  I  T  f  9  9*9*9 


Begin: 


data  d8gnabrs/1680*0/ 
data  dsgncode/320t'  V 
do  1  j  *  1,3 
do  2  k  =  1,2 

dsgnabrs(3,  j ,  k )  =  dsgnabr 3( j ,  k ) 

2  continue 
1  continue 

do  3  J  *  1,6 
do  4  li  -  1,2 

dsgn«brs(4, j,k)  =  dsgnabr4( ),k) 
4  continue 

3  continue 

do  5  j  *  1,10 
do  6  k  s  1,2 


w 


dagnatorslS, J,k) 

6  continue 

5  continue 

do  n  *  1,6 
do  Ik  >  1,3 
dsgnabrs(6, j,k) 

6  continue 

7  continue 

do  9  J  »  1,7 
do  10  k  -  1,3 
dsgnabrs(7,  j,k) 

10  continue 
9  continue 

do  11  J  =  1,15 
do  12  k  -  1,3 
dsgnabrs(9, j ,  k ) 

12  continue 

11  continue 

do  13  j  3  1,10 
do  14  k  >  1,4 
dsgnabrsdO,  j,k ) 

14  continue 

13  continue 

do  15  j  =  1,11 
do  16  k  -  1,5 
dsgnabrsdl,  j,k) 

16  continue 

15  continue 

do  17  j  *  1,12 
do  18  k  =  1,4 
dsgnabrs(12, J,k) 

18  continue 

17  continue 

do  19  j  =  1,24 
do  20  k  =  if4 
dsgnabrsd6,  j,k) 

20  continue 

19  continue 

do  21  j  =  1,4 
do  22  k  =  1,2 
dsgncode(2, J,k) 

22  continue 

21  continue 

do  23  j  =  1,8 
do  24  k  *  1,3 
dsgncode( 3, j,k) 

24  continue 

23  continue 

do  25  j  »  i#i6 
do  26  k  -  1,4 
dsgncode(4, J,k) 
26  continue 

25  continue 


a  dsgn«br5( J,k) 


a  dsgnabr6( J,k ) 


a  dsgnabr7( J,k ) 


a  dsgnabr9( j,k) 


a  dsgnabra( j,k) 


a  dsgnabrbl j,k) 


a  dsgnabrct J,k) 


dsgnabrgl j,k) 


=  dsgncde2( j,k) 


a  dsgncde3( j , k ) 


=  dsgncde4( j,k) 


do  28  k  =  1,5 

dsgncode(5, j,k)  =  dsgn5frc( ),k ) 

28  continue 
27  continue 
return 
end 
c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

subroutine  Design3(code) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

real  dsgnatrx! 385,64) 

coaaon  /dsqnatrx/dsqnatrx 

character*!  dsqncode ( 2 : 5, 16, 5 ) 

lnteqer*2  dsqnabrs! 3 : 16, 24,5) 

coaaon  /aspects/dsqncode,dsqnabrs 

lnteger*2  paraatrs, controls! 16) 

double  precision  low(16),aid!16),hlgh(16) 

coaaon  /uncode/paraatrs, low, aid, high, controls 

lnteqer>2  features! 3 : 16, 3 ) 

coaaon  /features/features 

real  desgnvar(l,16) 

Integer *2  1, ),k, col, row, rowlines, lines, s, tot lrows 
character*!  plus, alnus, code 
data  plus/'+'/ainus/'-'/ 
data  dsgnatrx/24640*0/ 
c 
c 

c  Begin: 

c 

c 

lines  =  features (paraatrs,l) 
rowlines  >  features (paraatrs, 2) 
s  -  features (paraatrs, 3) 
do  4  l  =  1, lines 
do  5  j  =  1, rowlines 

row  *  J  ♦  !(l  -  1)  *  rowllnes) 
col  =  1 

do  6  k  *  1, paraatrs 
if  (col  .le.  s)  then 

If  (k  .eg.  dsgnabrs! paraatrs, l, col ) )  then 


o  u 


If  (dsgncode(s, J,col)  .eq.  plus)  then 
dsgnatrx(row,k )  =  1 
else 

If  (dsgncode(s, j,col )  .eq.  ainus)  then 
dsgnatrx(row,k)  =  -1 
else 

print  *,  'Error  at  row  ',row, '  and  coluan  ',k 
end  If 
end  If 

col  =  col  ♦  1 
end  If 
end  If 

6  continue 
S  continue 

4  continue 

if  (code  .eq.  'n')  then 
totlrovs  *  row  ♦  1 
do  1  1  =  l,totlrows 
col  =  0 

do  7  j  =  l,paraatrs 

desgnvar ( 1, J )  =  dsgnatrx( 1, j ) 

7  continue 

do  2  j  =  l,paraatrs 

do  3  k  =  l,controls( j) 

col  =  col  ♦  1 

if  (desgnvar ( 1, j)  .eq.  1.0)  then 
dsgnatrx( l,col)  2  high(j) 
else 

if  (desgnvar (l,j)  .eq.  0.0)  then 
dsgnatrx( l,col)  =  ald(J) 
else 

dsgnatrx( l,col )  =  low(j) 
endlf 
end  if 

3  continue 

2  continue 
1  continue 
endlf 
return 
end 
c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Rgrsslon 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 

Purpose: 


o  o 


c  variables: 


Integer *2  selctlon(4) 
coaon  /cholces/selctlon 
Integer *2  response! 5) 
coason  /respnses/response 

Integer *2  1, j, paramtrs, tot lrows, totlcols, ob jet lve, process, dummyarg 
logical  fllesok 
c 

c  Begin: 

c 

c  The  forthcoming  Fortran  code  performs,  respectively,  the  following  steps 
c 

c  1)  Obtain  Input  for  this  subroutine; 

c  2)  Initialize  those  variables  and  matrices  that  require  It; 

c  3)  Compute  the  'Xprlme'  matrix; 

c  4)  Compute  the  'XprlmeX'  matrix; 

c  5)  Compute  the  'XprXInvr'  matrix; 

c  6)  Compute  the  'Yprlme'  matrix; 

c  7)  Compute  the  'YprlmeY1  matrix; 

c  8)  Compute  the  'XprlmeY'  matrix; 

c  9)  Compute  the  'B'  matrix; 

c  10)  Compute  the  'Bprlme*  matrix; 

c  11)  Compute  the  'BprXprY'  matrix; 

c  12)  Compute  the  'Onesprme*  matrix; 

c  13)  Compute  the  'YprmOnes'  matrix; 

c  14)  Compute  the  'OnesprmY'  matrix;  and 

c  IS)  Compute  the  'YprllprY'  matrix, 

c 

dummyarg  =  0 
fllesok  s  .true. 

call  Rgr si npt ( paramtrs , tot  1 rows , process , f 1 lesok ) 

If  (fllesok)  then 

call  ConstVls( paramtrs, tot 1 rows, tot lcols) 
do  2  l  *  1, process 
objctlve  *  response! 1) 
do  1  }  «  1,2 

call  Rgrs Ini t ( paramtr s, tot lrows, tot lcols, objctlve, 
t  selctlon(j)) 

If  (J  .eq.  1)  then 
call  or thognl! tot lrows, paramtrs) 
end  If 

call  Trnspose! tot lrows, tot lcols, dummyarg, se let  ion! 1 ) ) 
call  NtrxHply! tot lcols, tot lrows, tot lcols, dummyarg, 
t  selction(l)) 

call  Rqrslnvr (tot lcols, paramtrs, se let  Ion! j ) ) 

If  (j  .eq.  2)  then 

call  Tr nspose! tot lrows, dummyarg, objctlve,selctl on! 2) ) 
call  HtrxHply! dummyarg, tot l rows, dummyarg, objctlve, 
a  selctlon(2)) 

end  If 

call  HtrxHply (tot lcols, tot lrows, tot lcols, ob jet lve, 
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4  se let  Lon ( 3 ) ) 

call  Trn8pose(totlcols,duaayarg,objctlve,selctlon(3) ) 

If  (j  .eq.  1)  then 

call  CapStats(totlrows,totlcols,objctive,selctlon(l) ) 
else 

call  NtrxMply(totlrows,totlcols,totlrows,objctlve, 

(  selctlon(4)) 

call  CapStats(totlrows,totlcol8,objctive,selction(2) ) 
end  if 

1  continue 

2  continue 

call  RgrsOputl tot lcols, tot 1 rows, process, response) 
call  PorDcode(paraatES,totlcol3, process, response) 
end  If 

c 

c  Tine  to  exit: 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subrout 1 ne  RgrsI npt ( paraatr s , tot 1 rows , process , f 1 lesok ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  Input  froa  external  sources  the  required  data  necessary 

c  to  execute  the  regression  package. 

c 

c 

c  Variables: 

c 

c 

double  precision  TheDeslgn(385,16) 

coaaon  /TheDeslgn/TheDes lgn 

character‘8  paranaesl 16), blanks# 

coaaon  / The Na aes/par an aes, blanks 8 

integer *2  paraatrs,totlrow8,objctves,process 

logical  fllesok 

character  reader *1,  f  1  lenaae'8,  f  1  leindxM 
Integer *2  1, j, lines, r owl ines, whichone 

c 

c  Begin: 

c 

c  Obtain  the  nuaber  of  paraaeters  and  their  naaes. 

c 

blanksS  =  ' 
whichone  *  l 

open  (unlt*l,err=8,f lle= 'rgrsslon. In' , status* 'old* ) 
whichone  3  2 
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5 


8 


9 


10 


11 

12 

13 

14 


read  (1,11, err =8)  paraatrs 
do  1  1  *  1, paraatrs 
paranaes(l)  =  blanks8 
read  (1,12)  paranaes(l) 
continue 
close  (1) 

Obtain  the  aatrlx  design, 
whichone  *  1 

open  (unlts2,err=9,flle='dsgnatEx.in,,status»'oldl ) 
whichone  =  2 

read  (2,13,err=9)  lines, rowlines 
totlrows  =  ( llnes*rowlines)  ♦  1 
do  5  1  =  1, totlrows 

read  (2,14,err=9)  (TheDeslgn( 1, j ),  j  =  1, paraatrs) 
continue 
close  (2) 

Go  get  the  responses: 

call  HowHnyYs(objctves, process) 

call  GetRspns (objctves, process, tot lrows, f llesok) 

Get  out  of  here  if  no  errors: 

go  to  15 

Brror  code: 

if  (whichone  .eq.  2)  then 
close  (1) 
end  if 

file  naM  =  '  RGRSSIOM ' 
f llelndx  =  '.IN  1 
go  to  10 

if  (whichone  .eq.  2)  then 
close  (2) 
end  if 

f llenaae  =  ' DSGMMTRX ' 
f llelndx  *  MM  1 

call  Fllerror(f llenaae, f llelndx, whichone) 
f llesok  =  .false, 
go  to  15 

Poraat  stateaents: 

foraat  (lx, 12) 
foraat  (IX, A8) 
foraat  (2(1X,I2) ) 
foraat  (16(1X,P4.1)) 


Another  subroutine  finished: 


NHVlinrfflVUH' 


* 


c 

15  return 
end 
c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  HowMnyYs( objetves, process) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

integer *2  objetves, process, objctlat 
character*!  reader 


c  Begin: 
c 

c  Receive  the  total  number  of  objectives  froa  the  user: 
c 

objctlat  =  5 

1  call  ScrlScrn(ll) 
print  5,  objctlat 
call  ScrlScrn(ll) 

read  (*,6,err=2)  objetves 

If  (objetves  .It.  1  .or.  objetves  .gt.  objctlat)  then 

2  call  ScrlScrn(ll) 
print  7,  objctlat 
call  ScrlScrn(ll) 
accept  8,  reader 
go  to  1 

end  if 
c 

c  Receive  the  nuaber  of  objectives  the  user  wishes  to  process: 
c 

3  call  ScrlScrn(ll) 
print  9 

call  ScrlScrn(ll) 
read  (*,6,errM)  process 

if  (process  .It.  1  .or.  process  .gt.  objetves)  then 

4  call  ScrlScrn(ll) 
print  7,  objetves 
call  ScrlScrn(ll) 
accept  8,  reader 
go  to  3 

end  if 


>  |  *  «  A.*  *»  i,  ,<»»  **  * *v  i  *  >  4  |  «*l'*»4‘ ttj' A*  Jt»  JtLklAI  ‘I  >**  i*.  ■».  »  «  j  ■  a  i  i  rt.l  *  ■  i 


Format  statements: 

5  format  (*  ','How  many  response  objectives  (total)  are  there?  ', 

a  '(Max  of  ' , II, ' ) : ' ) 

6  format  (I) 

7  format  ('  'Value  has  to  be  an  integer  between  1  and  ',11,'!!', 

a  /,'  Press  *return"  to  reenter  value:') 

8  format  (a) 

9  format  ('  ','How  many  of  the  total  response  objectives  do  you  ', 
4 'wish  to  process?') 

Through: 

return 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  GetRspns(objctves, process, totlrovs,f llesok) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 


Purpose: 


Variables: 


double  precision  Y( 385,5) 

common  /rspnsmtc/Y 

integer *2  response! 5) 

common  /respnses/response 

integer*?  objctves, process, tot lrows 

logical  f llesok 

lnteger*2  1, j,k,whichone 

character  endlng(5)*2,readcr*l, f ilename*8, f lleindx*4 
data  ending/'st' , 'nd' , 'rd' , 2*'th'/ 

Begin: 

Read  in  the  responses  and  put  into  matrix  * Y ' . 
whlchone  =  1 

open  (unlt-3,err=8, f lle='respnses . in' ,status='old' ) 
whlchone  -  2 

if  (objctves  .eq.  process)  then 
If  user  wishes  to  process  all  responses  then: 
do  1  i  =  l,totlrows 
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read  (3,14,err=8),  (Y(l,j),  J  =  1, objctves) 
continue 
do  2  l  =  1,5 
response! i)  =  i 
continue 
else 


Else,  find  out  which  responses  the  user  wants  to  process. 


do  7  j  =  1, process 
call  ScrlScrn(ll) 
print  9,  j,ending(j) 
call  ScrlScrn(ll) 
read  (*,10,err=4)  response(j) 

if  (response! j)  .It.  1  .or.  response! J)  .gt.  objctves)  then 


If  user's  input  is  not  an  integer  and  not  within  the  bounds, 
make  him/her  reenter. 


call  ScrlScrn(ll) 
print  11,  objctves 
call  ScrlScrn(ll) 
accept  12,  reader 
go  to  3 
end  if 

do  5  k  =  1,3 

if  (k  .ne.  j)  then 

if  (response(k)  .eg.  response! j))  then 


If  the  user  tries  to  process  a  response  twice,  send  him/her 
back  to  the  beginning  to  reenter  his/her  answer. 


call  ScrlScrn(lO) 
print  13,  response! j),k,ending(k) 
call  ScrlScrn(ll) 
accept  12,  reader 
go  to  3 
end  if 
end  if 
continue 


Read  in  the  response  values  the  user  wants  to  process: 


k  =  response! j) 
rewind  (3) 
do  6  i  =  l,totlrows 
if  <k  .eq.  1)  then 
read  (3,14,err=8),  Y(i,k) 
else 

if  (k  .eq.  2)  then 
read  (3,15,err=8),  Y(l,k) 
else 

if  (k  .eq.  3)  then 


i 

* 

■ 

i 

i 

r 

; 

I 

t 

! 


P 


c 

c 

c 


c 

c 

c 


c 

c 

c 


read  (3,16,err=8),  Y(l,k) 
else 

if  (k  .eq.  4)  then 

read  (3,17,err=8),  Y(l,k) 
else 

read  (3,18,err=8),  Y(i/k) 
end  If 
end  If 
end  if 
end  if 

6  continue 

7  continue 
end  if 
close  (3) 
go  to  19 

Error  code: 

8  if  (vhlchone  .eq.  2)  then 

close  (3) 
end  if 

filename  =  'RESPNSES' 
fllelndx  =  '.IN  ' 

call  Fllerror (filename, file indx, vhlchone) 
filesok  =  .false, 
go  to  19 

Format  Statements: 

9  format  ('  ' ,'What  is  the  number  of  the  ',I1,A2,'  response 

&  'objective?') 

10  format  (I) 

11  format  ('  ', 'Value  has  to  be  an  Integer  between  1  and  ',11,'!!', 

&  /,'  Press  "return"  to  reenter  value:') 

12  format  (a) 

13  format  ('  ','You  have  already  entered  the  value  ',11,'  for  the  ', 
All, A2, '  response  objective!!',/,'  Press  "return"  to  reenter:') 

14  format  (5(1X,F6.2)) 

15  format  (8X,F6.2) 

16  format  (15X,F6.2) 

17  format  (22X,F6.2) 

18  format  (29X,F6.2) 

Another  masterpiece!! 

19  return 
end 


c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  ConstVls ( paramtrs , totlrows , totlcols ) 
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*  m  *  -  ' 


•  *  »  V  w** 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

c 

c 

c  Purpose:  To  initialize  and  setup  those  variables  and  Matrices  whose 

c  values  never  change  thoughout  the  program, 

c 
c 

c  Variables: 

c 

c 

character  varnamel(153)*8,varname2(153)*8,times(153)*3 
common  /varnames/varnamel,varname2, times 
character *8  parmnmes(16),blanks8 
common  /TheMames/parmnmes,blanks8 
integer*2  selction(4) 
common  /choices/selction 
double  precision  Ones,Onesprme 
common  /onesmtcs/Ones,Onespr»e 
integer *2  paramtrs, tot lrovs, tot lcols 
Integer *2  1, j,k,l, lincol, col, nextprms 
c 

c  Begin: 

c 

c  Initialize  the  variable  names, 

c 

lincol  =  paramtrs  +  1 
do  2  j  »  1, paramtrs 
col  =  lincol  ♦  j 
varnamel(col)  =  parmnmes(j) 
varname2(col )  =  blanks8 
times(col)  =  '  ' 

2  continue 

do  H  -  1, paramtrs 
do  3  k  =  j, paramtrs 
it  (k  .eq.  j)  then 
1  =  j  ♦  1 

varnamel(l)  =  parmnmes(j) 
varname2(l)  =  parmnmes(k) 
tlmes(l)  =  '  *  ' 
else 

col  =  col  *■  1 

varnameMcol)  =  parmnmes(j) 
varname2(col )  *  parmnmes(k) 
tlmes(col)  =  '  •  ' 
end  if 

3  continue 

4  continue 

varnamel(l)  =  ' I NTBRCBP ' 
varname2(l)  =  blanksS 
tlmesd)  =  'T  ' 
c 

c  Compute  the  total  columns  in  the  Regression  matrix: 


totlcols  =  1  +  pacaatrs 
do  6  l  =  l,paraatrs 

nextpras  =  pacaatrs  -  (1  -  1) 
totlcols  =  totlcols  ♦  nextpras 

6  continue 
c 

c  Set  the  'selction'  array: 
c 

do  7  i  =  1,4 
selction(i)  =  i 

7  continue 
c 

c  Initialize  matrix  'Ones': 

c 

ones  =  1.0 
c 

c  Create  the  transpose  of  matrix  'Ones',  i.e.,  'Onesprue'. 
c 

Onesprae  =  Ones 
c 

c  Another  subroutine  finished: 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  RgrsInlt(paraatrs,totlrovs, totlcols, ob jet ive, choice) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  initialize  and  compute  the  variables  and  matrices  necessary 

c  for  regression  computations, 

c 
c 

c  Variables: 

c 

c 

double  precision  TheDeslgn(385,16) 
common  /TheDesign/TheDeslgn 
double  precision  X( 385, 153) 
common  /theXmtrx/X 
double  precision  XprXInvr (153,153) 
common  /Xprxlnvr/XprXInvr 

double  precision  SaveX(385,153),Savelnvr(153,153) 
common  /SaveMtcs/SaveX,SaveInvr 
integer#2  totldltd(153) 
coomon  /totldltd/totldltd 

Integer *2  paramtrs, totlrovs, totlcols, ob jet ive, choice 


Integer *2  1, J,k,l,m, lincol, col, nextprms 
Begin: 

First,  initialize  the  'totldltd*  array: 

go  to  (l,2),choice 
1  do  11  i  =  1, tot lcols 
totldltd(l)  =  0 

11  continue 

Second,  compute  the  regression  matrix  ('X')  by  expanding  'TheDeslgn' 
matrix. 

lincol  =  paramtrs  +  1 
do  15  i  =  l,totlrows 
X(i,l)  =  1.0 
do  12  j  =  1, paramtrs 
col  =  lincol  +  j 
X(l,col)  =  TheDesignt i, j) 

12  continue 
1  =  0 

do  14  j  =  1, paramtrs 
do  13  k  =  j, paramtrs 
if  (k  .eq.  j)  then 
m  =  j  ♦  1 

X(l,m)  =  TheDesignt 1 , j )  *  TheDesignt i,k) 
else 

1  =  1  +  1 

col  =  1  +  (2  •  paramtrs)  ♦  1 
X(l,col)  =  TheDesignt 1, j)  *  TheDesignt l,k) 
end  if 

13  continue 

14  continue 

15  continue 

Check  if  user  wants  to  modify  the  regression  matrix. 

call  Stepwise (totlrovs, totlcols, ob jet ive) 

Save  the  'X'  matrix  for  second  init. 

do  17  i  =  l,totlrows 
do  16  j  =  1, totlcols 
SaveXtl, j)  =  X(l,j) 

16  continue 

17  continue 

Initialize  the  XprXlnvr  matrix  by  setting  the  diagonal  elements  to  1.0 

do  19  i  =  1, totlcols 
do  18  j  =  1, totlcols 
if  (i  .eq.  j)  then 


non  no 


XprXInvr! 1, J)  *  1.0 
else 

XprXInvrd,  j)  =  0.0 
endLf 

18  continue 

19  continue 
c 

c  Save  the  'XprXInvr'  Matrix, 
c 

do  22  i  =  1 , tot lcols 
do  21  j  =  1, tot lcols 

Savelnvrd,  j)  =  XprXInvrd,  j) 

21  continue 

22  continue 
return 

c 

c  The  second  lnlt:  First,  reinit  the  'X'  Matrix, 
c 

2  do  40  i  =  l,totlrovs 
do  41  j  =  l,totlcols 
X(l,j)  =  SaveXd,  J) 

41  continue 
40  continue 

c 

Second,  reinit  the  'XprXInvr*  Matrix. 

do  43  i  =  l,totlcols 
do  42  j  =  l,totlcols 

XprXInvrd,  j)  =  Savelnvrd,  j) 

42  continue 

43  continue 
return 

Bye,  Bye  again: 

end 

c 
c 
c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Stepwise ( tot lrovs, tot lcols, ob jet ive) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
•  c 

i  c 

c  Purpose:  Initialize  and  coMpute  the  variables  and  Matrices  necessary 

c  for  regression  coMputations. 

c 
c 


Variables: 


lnteger‘2  totldlts 

coaon  /totldlts/totldlts 

Integer *2  diet  Ions 

common  /diet ions/dlet ions 

character^  dpndntnm(S) 

coMon  /dpndntnm/dpndntnm 

Integer *2  tot  1 rows, totlcols,objctlve 

integer*2  whchllne 

character *1  mod l fy,goodchar, dele ted, repeat 
data  dpndntnm/'Yl','Y2', 'Y3','Y4', ' Y5* / 

Begin: 

dletlons  =  0 
repeat  =  • y ' 
whchllne  =  1 

1  if  (repeat  .eg.  'y*  .or.  repeat  .eq.  ' Y ' )  then 

call  ScrlScrn(ll) 

If  (whchllne  .eg.  1)  then 
print  3,  dpndntnm(objctlve) 
else 

print  4,  dpndntnm(objctive) 
end  If 

call  ScrlScrn(ll) 

accept  2,  modify 

call  ChckChar(modify,goodchar ) 

If  (goodchar  .ne.  'y')  then 
call  BadChar 
go  to  1 
end  If 

whchllne  =  whchllne  ♦  1 

If  (modify  .eq.  * y *  .or.  modify  .eq.  * Y ’ )  then 
call  RdceMtrx(totlrows,totlcols,objctlve, deleted) 
if  (deleted  .eq.  ' y ' )  then 
dletlons  =  dletlons  ♦  1 
end  If 
else 

repeat  =  'n' 
end  If 
go  to  1 
end  If 

totldlts  =  dletlons 
Format  statements: 

2  format  (a) 

3  format  ('  ','Do  you  wish  to  delete  a  variable  In  response 

«' objective  ',A2,'?  ( y/n) ' ) 

4  format  ('  ','Do  you  wish  to  delete  another  variable  in  response' 

*'  objective  ',A2,'?  (y/n)') 


Adlos: 


n  n 


return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  RdceHtr x ( totlr ows, tot lcols,ob jet ive, deleted) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Initialize  and  compute  the  variables  and  matrices  necessary 

c  for  regression  computations, 

c 
c 

c  Variables: 

c 

c 

double  precision  X( 385,153) 
common  /theXmtrx/X 
Integer *2  totlrows,totlcols,objctlve 
integer*2  l,col 

character*!  okay, reader , deleted 
c 

Begin: 

1  call  ShovVars( totlcols, objetive) 
read  (*,7,etr=2)  col 
call  ChckNmbr( col, totlcols, okay) 

IE  (okay  .eq.  * n ' )  then 

2  call  ScrlScrn(ll) 
print  5,  totlcols 
call  ScrlScrn(lO) 
accept  6,  reader 
go  to  1 

else 

if  (col  .eq.  0)  then 
deleted  =  'n' 
else 

do  4  1  =  l,totlrows 

X(l,col)  =  0.0 

4  continue 
deleted  =  ' y ' 

end  if 
end  if 
c 

c  Format  statements: 
c 

5  format  ('  'Reminder,  value  has  to  be  an  Integer  between  2  ', 

4'and  ',13,',  or  zero.',/,'  Press  •return"  to  try  again:') 

6  format  (a) 

7  format  (13) 


u  o 


return 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  ShowVars(totlcols,objctive ) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Purpose:  Initialize  and  compute  the  variables  and  matrices  necessary 
for  regression  computations. 


Variables: 


character  var namel ( 153 ) *8 ,varname2( 153)*8,tii 
common  /varnames/var name 1, var name 2, times 
character *2  dpndntnm(5) 
common  /dpndntnm/dpndntnm 
lnteger*2  totlcols, objctlve 
integer *2  l, j,k, lnstoscl, llnestkn 
character*!  reader 

Begin: 


;s  ( 153 )  *3 


llnestkn  =  0 

do  1  l  =  1, totlcols, 3 

If  ((totlcols  -  1)  .ge.  2)  then 
llnestkn  -  llnestkn  +  1 
1  =  1  +  1 
k  =  l  ♦  2 

print  2,  i,varnamel( 1 ), times ( 1 ) ,varname2( 1 ) , 
i  j, var name 1( j ), times ( j),varname2( j), 

1  k,varnamel(k),times(k),varname2(k) 

If  (llnestkn  .eq.  20)  then 
llnestkn  =  0 
call  ScrlScrn(l) 

print  *,  ’Press  "return"  to  continue' 
call  ScrlScrn(l) 
accept  3,  reader 
end  If 
else 

llnestkn  =  llnestkn  +  1 
If  ((totlcols  -  l)  .eq.  1)  then 
1  =  1  +  1 

print  2,  i,varnamel(i),times(i),varname2(i), 


«  J,varnamel( J ) ,tlmes( j ) , varname2( j ) 

else 

print  2,  i,varnaael(  1  ),times(  i  ),varname2(  i ) 
end  If 
end  If 

1  continue 

lnstoscl  «  20  -  llnestkn 
call  ScrlScrn( lnstoscl ) 
print  4,  dpndntnm(objctive ) , totlcols 
call  ScrlScrn(l) 
c 

c  Format  Statements: 

c 

2  format  ('  ',3(2X,I3, ' :  ' , 1X,A8,A3,A8) ) 

3  format  (a) 

4  format  ('  ','For  ' ,  A2, ' ,  which  variable,  between  2  and  ',13, 

4',  do  you  wish  to  delete?',/, '  Snter  zero  (0)  for  none:') 

c 

c  Mo  more  "vars"  to  show: 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
C  C 

Subrout i ne  ChckNmbr ( col , t ot 1 col s , okay ) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Initialize  and  compute  the  variables  and  matrices  necessary 

c  for  reqresslon  computations, 

c 
c 

c  Variables: 

c 

c 

integer*2  dletions 
common  /diet lons/dlet ions 
lnteger*2  tot ldl td ( 153  > 
common  /totldltd/totldltd 
lnteger*2  1 ,col,totlcols 

character*!  okay, reader, deleted, cutalrdy, finished 
c 

c  Begin: 

c 

if  (col  .ge.  2  .and.  col  .le.  totlcols)  then 
okay  *  ' y  * 
else 

if  (col  .eq.  0)  then 
okay  =  *  y * 
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okay  *  'n' 
end  If 
end  if 

if  (okay  .eq.  * y * )  then 
cutalrdy  =  'n' 
finished  =  'n' 
i  *  0 

1  if  (cutalrdy  .eq.  'n'  .and.  finished  .eq.  ' n ' )  then 

1  =  1*1 

if  (i  . le.  diet  Ions)  then 

if  (col  .eq.  totldltd(l))  then 
cutalrdy  =  'y' 
end  if 
else 

finished  =  'y* 
end  if 
go  to  1 
end  if 

if  (cutalrdy  .eq.  * y * )  then 
call  ScrlScrn(ll) 
write  ( #, 2 )  col 
call  ScrlScrn(lO) 
accept  3,  reader 
okay  *  'n' 
else 

totldltdd )  =  col 
end  if 
end  if 

2  foraat  ('  ','The  variable  nuaber  you  Inputted,  nuaber  ’ , 1 3 , 

a',  has  already  been  deleted  It '  Press  "return”  to  continue:') 

3  foraat  (a) 
return 
end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  0rthognl(rovs,paraatr8) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  create  an  orthogonal  aatrix  out  or  the  regression  aatrlx, 

c  l.e.,  'X',  by  using  the  Graaa-Schaidt  process, 

c 
c 

c  Variables: 

c 

c 

double  precision  X(385,153) 
coaaon  /theXatrx/X 


Integer*2  rows,paramtrs 

double  precision  P£ctMtrx(385,153),Divisors(17) 
double  precision  SSbyCols, xmltplir 
integer*2  columns, xcol,vcol, row 
c 

c  Begin: 

c 

columns  =  paramtrs  ♦  1 
do  S  xcol  =  1, columns 
do  1  row  =  l,rovs 

P£ctMtrx( row, xcol)  =  X< row, xcol) 

1  continue 

do  4  vcoi  =  l,xcol 
SSbyCols  =  0.0 
do  2  row  =  1, rows 

SSbyCols  =  SSbyCols+(PfctMtrx(row,xcol )*P£ctHtrx(row,vcol) ) 

2  continue 

i£  (vcol  .It.  xcol)  then 

l£  (Divlsors(vcol)  .gt.  0)  then 
xmltplir  =  SSbyCols  /  Divisors(vcol) 
do  3  row  =  l,rows 

P£ctHtrx(row,xcol)  =  PfctMtrx(row,xcol )  - 
&  (xmltplir  *  PEctHtrx( row, vcol ) ) 

3  continue 
endi£ 

else 

Divisors (xcol)  =  SSbyCols 
end  if 

4  continue 

5  continue 

do  7  xcol  =  1, columns 
do  6  row  =  l,rows 

X(row,xcol)  =  P£ctMtrx(row,xcol ) 

6  continue 

7  continue 
c 

c  Another  one  bites  the  dusti! 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Tr nspose (row, column, oblct ive , choice ) 
c  c 

ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Take  the  transpose  o£  a  matrix.  Control  is  managed  through 

c  the  variable  'choice'. 


3 


u  o 


i  4  <  t  j  1.i  t  j  |.|  *  J  *•!  «i| 


■a  a  u  a 


double  precision  B(153,5) 
coaaon  /theBatrx/B 

double  precision  Xprime(153,385),Yprlme(5,385) 

coaaon  /trnspses/Xpr iae, Ypr lae 

double  precision  X(385,153) 

coaaon  /theXatrx/X 

double  precision  Y(385,5) 

coaaon  /rspnsatc/Y 

double  precision  Bpriae(S,153) 

coaaon  /Bpriae/Bpr lae 

integer *2  r ow, column, ob jet ive, choice 

integer*2  l,j 

Begin: 

go  to  (1,2, 3), choice 

Create  the  transpose  of  matrix  'X',  l.e.,  'Xprime'. 

do  11  i  =  l,rov 
do  10  J  =  1, column 
Xpr lae( j, 1 )  =  X(i,J) 
continue 
continue 
return 


c  Create  the  transpose  of  matrix  'Y',  i.e.,  ' Yprime’. 

c 

2  j  =  ob jet ive 

do  13  l  =  i,rov 

Ypr iae (1,1)  *  Y(i,j) 

13  continue 
return 
c 

c  Create  the  transpose  of  matrix  'B',  i.e.,  'Bpriae'. 

c 

3  j  =  ob Jet ive 

do  15  1  *  l,rov 

Bpr ime ( J, i )  =  B(i,J) 

15  continue 
c 

c  That's  all  folks! ! 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
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c  c 

Subroutine  MtrxMply(LeftSlde, Ins lde,RghtSlde,objctive, choice ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Multiply  two  matrices  together.  Control  is  achieved  through 

c  the  variable  'choice1, 

c 

c  Variables: 

c 

c 

double  precision  Y ( 385, 5 ) 

common  /rspnsmtc/Y 

double  precision  X ( 385, 153 ) 

common  /theXmtrx/X 

double  precision  XprXInvr (153,153) 

common  /XprXlnvr/XprXInvr 

double  precision  Ones,Onesprme 

common  /onesmtcs/Ones,Onesprme 

double  precision  Xprime(153, 385), Yprime(5,385) 

common  /trnspses/Xpr lme, Yprlme 

double  precision  Bprlme(5,153) 

common  /Bpr Ime/Bpr lme 

double  precision  8(153,5) 

common  /theBmtrx/B 

double  precision  XprlmeX( 153, 153) 

common  /Xpr imeX/XprimeX 

double  precision  YprlmeY,BprXprY,XprlmeY(153,5),YprllprY 
common  /statmtcs/Ypr lme Y , Bpr Xpr Y , Xpr ImeY, Ypr 1 IprY 
double  precision  XtlmesB(385,5) 
common  /XtlmesB/XtlmesB 
double  precision  YprmOnes,OnesprmY 
lnteger*2  Leftside, Inside, RahtSlde,objctlve, choice 
integer *2  i,j,k 
c 

c  Begin: 

c 

j  =  objctive 
go  to  (1,2, 3, 4), choice 
c 

c  Multiply  matrices  'Xprlme'  and  'X'  and  put  their  product  in 

c  matrix  'XprlmeX*. 

c 

1  do  23  1  =  1, Leftside 
do  22  J  =  l,RghtSlde 
XprimeX(l,j)  =  0.0 
do  21  k  -  1, Inside 

Xpr imeX( 1, j )  =  XprimeX(i,j)  +  (Xprime(i,k)  *  X(k,j)) 

21  continue 

22  continue 

23  continue 
return 
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Multiply  aatrices  ’Ypriae*  and  'Y'  and  put  their  product  in 
Matrix  1 Ypr iaeY ' . 

2  Ypr iaeY  =  0.0 

do  24  k  =  1, Inside 

YprineY  =  YpriaeY  4  (Ypri»e(jfk)  *  Y(k,j)) 

24  continue 
return 

Multiply  Matrices  'XpriMe'  and  'Y'  and  put  their  product  in 
Matrix  'XprlMeY' . 

3  do  29  i  =  1, Leftside 

XprlMeYflJ)  =  0.0 
do  27  k  =  1, Inside 

XpriMeY(i,j)  =  Xpri»eY(i,j)  ♦  (Xprime(i,k)  *  Y(k,j)) 

27  continue 

29  continue 

Multiply  Matrices  'XprXInvr*  and  'XpriMe'  and  put  their  product  in 
Matrix  'B*. 

do  32  i  =  1, Leftside 
B(i,j)  =  0.0 
do  30  k  =  l,RghtSlde 

B(  1 ,  j )  =  B( 1, j )  +  (XprXInvri  i,k)  *  XprlMeYU,  j ) ) 

30  continue 

32  continue 
return 

Multiply  Matrices  'BprlMe*  and  'XprlMeY'  and  put  their  product  in 
Matrix  'BprXprY'. 

4  BprXprY  =  0.0 

do  33  k  =  1, Inside 

BprXprY  =  BprXprY  *■  (BprlMe(j,k)  •  Xprl»eY(k,  j ) ) 

33  continue 

Multiply  Matrices  'YpriMe'  and  'Ones'  and  put  their  product  in 
Matrix  'YprMOnes'. 

YprMOnes  =  0.0 
do  36  k  =  l,RghtSlde 

YprMOnes  =  YprMOnes  4  (YpriMe(j,k)  *  ones) 

36  continue 

Multiply  Matrices  'OnesprMe'  and  'Y'  and  put  their  product  in 
Matrix  'OnesprMY'. 

OnesprMY  =0.0 
do  39  k  =  1, Leftside 

OnesprMY  =  OnesprMY  4  (Onesprae  *  Y(k,j)) 


o  o 


39  continue 


Multiply  Matrices  'YprmOnes*  and  'OnesprmY'  and  put  their  product  in 
matrix  'YprllprY'. 

YprllprY  =  0.0 

YprllprY  =  YprllprY  +  (YprmOnes  *  OnesprmY) 

Multiply  matrices  'X*  and  'B'  and  put  their  product  in  matrix 
•XtlmesB'. 

do  41  i  =  1, leftside 
XtlmesBU,  j)  *  0.0 
do  40  k  =  1, Inside 

XtlmesBU, j)  =  XtimesB(  1, j )  +  (X(i,k)  *  B(k,j)) 

40  continue 

41  continue 
return 

Pinished ! !  Through ! i  Capice ! ! 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Rgrslnvr (totlcols,paramtrs, choice) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Purpose:  Take  inverse  of  XprimeX  matrix. 


Variables: 


double  precision  XprXInvr(153,153) 
common  /XprXlnvr/XprXInvr 
double  precision  Xpr imeX( 153, 153 ) 
common  /Xpr ImeX/Xpr ImeX 
double  precision  rwmpller 

Integer *2  1, j,k, tot lcols, columns, paramtrs, choice 
Begin: 


go  to  (1,2), choice 

Take  the  inverse  of  an  orthogonal  matrix: 


1  do  10  i  =  1, totlcols 

if  (XprimeX( l,  1)  .eg.  0)  then 


go  to  10 

end  if 

XprXInvr (i,i)  =  XprXInvr (i,i)  /  XprimeX(i,i) 

10  continue 
return 

c 

c  Take  the  Inverse  of  a  non-orthogonal  matrix: 
c 

2  columns  =  paramtrs  ♦  1 
do  13  1  =  1, columns 

if  (XprlmeX( 1, 1 )  .eg.  0)  then 
go  to  13 
end  if 
c 

ccc  Find  the  non-zero  element  within  the  column  of  the  lith  element 
c 

do  12  j  =  1, columns 
if  (1  .eq.  J)  then 
go  to  12 
else 

if  (Xpr imeX( j, i )  .eq.  1.0E-16)  then 
go  to  12 
else 
c 

ccc  Calculate  the  row  multiplier: 

c 

rwmpller  =  XprimeX(j,i)  /  XprlmeX(i,i) 

c 

ccc  Do  a  row  operation  on  row  'j'  using  row  * i * : 

c 

do  11  k  =  1, columns 

XprimeX(j,k)  =  XprlmeX(j,k)  -  (rwmpller  *  XprimeX(  i,k ) ) 
XprXInvr ( j,k ) =Xpr XI nvr( j,k ) -(rwmpller* XprXInvr ( l,k ) ) 

11  continue 
end  if 

end  if 

12  continue 

13  continue 
c 

c  Finish  the  job  by  dividing  the  matrices  by  the  diagonal  elements: 
c 

do  15  i  =  l,totlcols 

if  (Xpr lmeX( i, i )  .eq.  0)  then 
go  to  15 
end  if 

do  14  j  =  l,totlcols 

XprXInvr ( 1, j )  =  XprXInvr ( l, j )  /  XprimeX(l,l) 

14  continue 

XprimeX(l,i)  =  XprimeX(i,i)  /  XprlmeX(i,l) 

15  continue 
return 


c 

c 


Another  one  done!?!! 


o  o 


c 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  CapStats ( tot lrows, tot lcols,ob jet ive, choice) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


c  Purpose: 

c 

c 

c  Variables: 

c 

c 

double  precision  Bpriae(5,153) 
coaaon  /Bpr lae/Bprlae 

double  precision  YprlaeY, BprXprY,XprlaeY(153,5) ,YprllprY 

coaaon  /statatcs/Ypr iaeY, Bpr XprY, Xpr iaeY, Ypr llprY 

double  precision  SSB(5),SSR(5),SSTO(5),Rsqrd(5),AdjRsqrd(5), 

&  HSR ( 5 ) , MSB ( 5 ) , nuar trdf ( S ) , dnar trd  f ( 5 ) , totaldf 3 ( 5 ) , Pvalue ( 5 ) , 
&  ParaSSQs( 153, 5) 

coaaon  /statstcs/SSB,SSR,SSTO,Rsqrd,AdjRsqrd,HSR,HSB,nuartrdf , 

&  dnartrdf, totaldf s, £ value, ParaSSQs 

double  precision  Y ( 385, 5) 
coaaon  /rspnsatc/Y 
double  precision  XtiaesB(385,5) 
coaaon  /XtlaesB/XtiaesB 
double  precision  Residual(385,5) 
coaaon  /residual/Resldual 
lnteqer42  totldlts 
coaaon  /totldlts/totldlts 
integer *2  tot lr ows, tot lcols,ob jet ive, choice 
lnteger*2  l,J,k 
c 

c  Begin: 

c 

j  =  ob jet ive 
go  to  (1,2), choice 
c 

c  Coapute  the  paraaeters*  sub  of  squares: 
c 

1  do  18  1  =  l,totlcols 

ParaSSQsd, j)  =  Bprlae(J,l)  *  XpriaeY(i,j) 

18  continue 
return 
c 

c  Coapute  the  SSE,  SSR,  and  SSTO: 

c 

2  SSE(j)  =  Ypr iaeY  -  BprXprY 
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SSR(J)  =  BprxprY  -  (YprllprY  /  totlrows) 

SSTO(j)  =  Ypr imeY  -  (YprllprY  /  totlrows) 
c 

c  Compute  the  R-squared  and  Adjusted  R-squared  statistics: 
c 

Rsqrd(J)  =  1.0  -  (SSE(j)  /  SSTO(j)) 
c  AdjRsqrd(j)  =  1.0  -  (((totlrows  -  1)  •  SSB(j))  / 

c  &  ((totlrows  -  totlcols  +  totldlts)  *  SSTO(j))) 

c 

c  Compute  the  degrees  of  freedom  for  the  SSTO,  SSR,  and  SSE  respectively: 
c 

c  totaldfs(j)  =  totlrows  -  1 

c  numrtrdf(j)  =  totlcols  -  1.0  -  totldlts 

c  dnmrtrdf(j)  =  totaldfs(j)  -  numrtrdf(j) 

c 

c  Compute  the  HSR  and  HSE  statistics: 
c 

c  MSR(j)  =  (SSR(j)  /  nuartrdf ( j) ) 

c  HSE(j)  =  (SSE(j)  /  dnmrtrdf ( j) ) 

c 

c  Compute  the  F-value  for  the  betas'  test: 
c 

c  Fvalue(j)  =  MSR(j)  /  MSE(j) 

c 

c  Compute  the  residuals: 

c 

do  11  i  =  1, totlrows 

Residualf  1, j)  =  Yd,!)  -  XtlmesB(l,j) 

11  continue 

c 

c  Sort  the  parameters  by  their  sums  of  squares  and  then  calculate  their 
c  percentage  contribution  to  the  SSR: 

c 

call  SortSSQs(ParmSSQs,totlcols,objctive) 
call  LeastVrs(SSR, totlcols, ob jet ive) 
return 
c 

c  I'm  out  of  here! ! 
c 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  SortSSQs(ParmSSQs, totlcols, ob jet ive) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  sort  the  parameters'  sum  of  squares  by  highest  quantity, 

c  These  rankings  are  used  to  delete  uncontr ibutlng  variables, 

c 
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c 

c 

c 


Variables: 


double  precision  ParaSSQs(153,5) 
double  precision  SrtdSSQs(153,5) 
cowon  /SrtdSSQs/SrtdSSQs 

character  var name 1 ( 153 ) *8 ,varna»e 2(153) *8, times (153) *3 
coMion  /varnames/varnamel,varnane2, times 

character  srtnaneld53,5)*8,srttlnesd53,5)*3/srtnane2d53,5)*8 
coawon  /SrtdVars/srtnamel,srttimes,srtna*e2 
lnteger*2  l, J,totlcols,objctive 
logical  anyexchg 
c 

c  Begin: 

c 

j  =  objctive 

do  2  l  =  l,totlcols 

SrtdSSQsd, J)  =  ParnSSQs( 1, 3) 
srtnaneM l, j )  =  varnameld) 
srttinesd,  j)  =  tines(i) 
srtnaae2d,j)  =  varnane2(i) 

2  continue 
anyexchg  =  .true. 

3  continue 

l£  (anyexchg)  then 
anyexchg  =  .false. 

do  4  1  *  2/ ( totlcols-1 ) 

if  (SrtdSSQsd,  j)  .gt.  SrtdSSQs(i+l,  j) )  then 
call  SwapNmbr(  SrtdSSQsd, J )  ,SrtdSSQs(l+l, J) ) 
call  SwpChtcr  (srtnameld, j),srttl*es(l, j ) ,srtnane2(l, j), 

&  srtnaneM  1+1,  J ),srttlnes(ld,  j) ,srtnane2(  id,  j ) ) 

anyexchg  =  .true, 
end  if 

4  continue 
go  to  3 

end  if 
c 

c  All  sorting  done.  Have  a  sorting-good  day: 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  SvapNnbr (argl,arg2) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 


c  Variables: 

c 

c 

double  precision  argl, arg2, temp 
c 

c  Begin: 

c 

temp  =  argl 
argl  =  arg2 
arg2  =  temp 
c 

c  A  quick  hello  —  goodbye: 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  SvpChtcr (argil, argl2,argl3,arg21,arg22,arg23) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

character *8  argll,arg21,argl3,arg23,teapl,teap3 
characters  argl2,arg22,teap2 
c 

c  Begin: 

c 

teapl  =  argil 
argil  =  arg21 
arg21  =  teapl 
teap2  =  argl2 
argl2  =  arg22 
arg22  =  teap2 
teap3  =  argl3 
argl3  =  arg23 
arg23  =  teap3 
c 

c  A  lesser-quick  hello  —  goodbye: 

c 

return 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Least Vrs(SSR, tot lcols, ob jet ive ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  take  the  sorted  parameters  and  group  them  In  bunches 

c  according  to  their  percentage  with  respect  to  their  SSR. 

c 
c 

c  Variables: 

c 

c 

double  precision  SrtdSSQs(153,5) 
coafton  /SrtdSSQs/SrtdSSQs 

double  precision  prcntaged53, 5)  ,ttlprcntd53,5) 
coHon  /prentage/prentage, ttlprcnt 
double  precision  SSR(5) 
integer*2  totlcols,ob jetive 
integer*2  i,j,k 
c 

c  Begin: 

c 

j  =  objetive 
ttlprcntd,  J)  =  0.0 
k  =  1 

do  1  l  =  2,totlcols 

prentaged, j)  =  SrtdSSQsd, j)  /  SSR(j) 
ttlprcnt(  l,  j )  =  ttlprcntd-1,  j )  ♦  prentaged,!) 

1  continue 
c 

c  See  you  later,  alligator;  after  while,  crocidile  — 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subi out ine  RgrsOput ( tot lcols , tot lrows , process , response ) 
c  c 

cccccccccccccccccccrccrccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 
c 
c 


Variables: 


integer *2  totlcols,totlrows, process, response ( 5) 
lnteger*2  1, begin, end, lookat, largest 
integer  HowHany 
character‘1  output, prntalso 

Begin: 

Allow  the  user  to  choose  which  objective  to  output. 

call  VhichVay( output) 
lookat  =  HowHany (process) 
if  (lookat  .eg.  process)  then 
begin  =  1 
end  =  process 
else 

largest  =  response(l) 
do  1  1  =  2, process 

if  (response(i)  .gt.  largest)  then 
largest  =  response(i) 
end  if 
continue 
begin  =  1 
end  =  lookat 
end  if 

if  (output  .eq.  'p')  then 

call  ToPrnter (totlcols,totlrows, process, response, largest, begin 
i  end) 

else 

call  Toscreen(totlcols,totlrows, process, response, largest, begin, 
i  end, prntalso) 

if  (prntalso  .eq.  'y'  .or.  prntalso  .eq.  'Y')  then 
lookat  =  HowHany (process) 
if  (lookat  .eq.  process)  then 
begin  =  1 
end  =  process 
else 

largest  =  response(l) 
do  2  l  =  2, process 

if  (response(l)  .gt.  largest)  then 
largest  =  response(i) 
end  if 
continue 
begin  =  1 
end  =  lookat 
end  if 

call  ToPrnter (totlcols,totlrows, process, response, largest, 
i  begin, end) 

end  if 
end  if 


No  sore  output.  Bye. 


o  o 


return 

end 


c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Integer  Function  HowMany (process) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Find  out  how  many  objectives  the  user  wishes  to  print. 

c 

c 

c  Variables: 

c 

c 

integer*2  process 
character *1  reader 
c  Begin: 
c 

1  call  ScrlScrn(ll) 
print  3,  process 
call  ScrlScrn(ll) 

read  (*,4,err=2)  HowMany 

if  (HowMany  .It.  1  .or.  HowMany  .gt.  process)  then 

2  call  ScrlScrn(ll) 
print  5,  process 
call  ScrlScrn(ll) 
accept  6,  reader 
go  to  1 

end  if 
c 

c  Format  statements: 

c 

3  format  ('  ', 'How  many  of  the  ',11,'  processed  response  ', 

S' objectives  do  you  wish  to  output?') 

4  format  (II) 

5  format  ('  Input  has  to  be  an  integer  between  1  and  ',11,' I!', 

4'  Press  "return*  to  reenter:') 

6  format  (a) 
c 

c  Another  one  bites  the  dust!! 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  VhlchVay( output) 


c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

character*!  reader , output 
c 

c  Begin: 
c 

1  call  ScrlScrn(lO) 
print  2 

call  ScrlScrn(lO) 
accept  3,  output 

if  (output  .eq.  'p'  .or.  output  .eq.  * P * )  then 
output  ■  ' p ' 
else 

if  (output  .eq.  's'  .or.  output  .eq.  'S')  then 
output  =  's' 
else 

call  ScrlScrn(ll) 
print  4 

call  ScrlScrn(ll) 
accept  3,  reader 
go  to  1 
end  if 
endif 
c 

c  Format  statements: 

c 

2  format  ('  ', 'Enter  the  letter  "p"  if  you  wish  to  print  the', 

«'  regression  output.  (Actually,',/,'  the  output  Is  written', 

*'  to  a  file  for  you  to  print  later.)  Bnter  the  letter',/, 

a'  "s"  if  you  wish  to  immediately  view  the  regression  output', 
a'  via  this  scope. ' ) 

3  format  (a) 

4  format  ('  Vronge  character!!!  Press  "return"  to  try  again.') 
c 

c  Through  with  this  one: 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  ToPrnter (totlcols, totlrovs, process, response, largest, 
a  begin, end) 


149 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 

c 

c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

double  precision  prcntage(153,5),ttlprcnt(153,5) 
coaaon  /prcntage/prcntage,ttlprcnt 
double  precision  SrtdSSQs(153, 5) 
coMon  /SrtdSSQs/SrtdSSQs 

character  srtnaael(153,5)*8,srttiaes(153,5)t3,srtnaae2(153,5)*8 

coiaon  /SrtdVars/srtnaael,srttlaes,srtnaae2 

double  precision  SSE(5),SSR(5),SSTO(5),Rsqrd(5),AdjRsqrd(5), 

A  HSR ( 5 ) , MSB ( 5 ) , nuar  trd f ( 5 ) , dnar  t rd £ ( 5 ) , tota id  £s ( 5 ) , Fva lue ( 5 ) , 

A  ParaSSQs(153,5) 

coaaon  /statstcs/SSB,SSR,SSTO,Rsqrd, Ad jRsqrd,HSR,HSB,nuartrdf , 

&  dnartrdf, totaldfs, £value,ParaSSQs 

character  varnaBel(153)>8/varnaae2(153)>8rtiaes(153)t3 
coaaon  /varnaaes/varnaael, varnaae2, tlaes 
double  precision  B(153,5) 
coaaon  /theBatrx/B 
integer*2  rspnstkn(5) 
coaaon  /taken/rspnstkn 
character*2  dpndntna(5) 
coaaon  /dpndntna/dpndntna 
double  precision  Y( 385,5) 
coaaon  /rspnsatc/Y 
double  precision  XtlaesBi 385,5) 
coaaon  /XtlaesB/XtlaesB 
double  precision  Residuali 385,5) 
coaaon  /residua 1/Res ldual 

lnteger*2  tot lcols, tot lrovs, process, response (5), largest, beg in, end 
lnteger42  1, J,k, leftover, prntdlns, sixty 
data  rspn8tkn/5*0/ 
data  slxty/60/ 
c 

c  Begin: 
c 

open ( uni t=7,flle=' regress .dat* ,status=' old' ) 
do  8  1  -  begin, end 

If  (process  .eq.  end)  then 
j  =  response! 1) 
else 

call  VhchRspn( process, response, largest, j, 1 ) 
end  if 

write  (7,900)  dpndntna(j) 
write  (7,901) 
write  (7,902) 

write  (7,903)  SSR( j ) ,SSE( j ) , SSTO( j ) ,Rsqrd( j ) 


write  (7,912)  dpndntnm(J) 

write  (7,913) 

write  ( 7,914) 

prntdlns  =  20 

do  3  k  =  2,totlcols 

If  (prntdlns  .It.  sixty)  then 
prntdlns  =  prntdlns  +  1 

write  (7,916)  k-l,srtnaael(k, j ) ,srttiaes (k, j ) ,srtnaae2(k, j) 
&  Sr  tdSSQs ( k , j ) , pr cntage ( k , j ) , tt lpr cnt ( k , j ) 

else 

write  (7,912)  dpndntnm(j) 
write  (7,913) 
write  (7,914) 

write  (7,916)  k-l,srtnaael (k, j ) ,srttiaes(k, j ) ,srtnaae2(k, j ) 
&  Sr tdSSQs ( k, J),prcntage(k, j),ttlprcnt(k,  J) 

prntdlns  =  11 
end  if 

3  continue 

leftover  =  sixty  -  prntdlns 
if  (leftover  .It.  10)  then 
do  2  k  =  1, leftover 
write  (7,911) 

2  continue 

prntdlns  =  0 
end  If 

write  (7,904)  dpndntna(j) 
write  (7,905) 
prntdlns  =  prntdlns  ♦  8 
do  1  k  *  l,totlrows 

If  (prntdlns  .It.  sixty)  then 
prntdlns  =  prntdlns  ♦  1 

write  (7,909)  k, Y(k, j ) ,XtimesB(k, j ) , Residual (k, j ) 
else 

write  (7,904)  dpndntna(j) 
write  (7,905) 

write  (7,909)  k,Y(k, j),XtimesB(k, j),Resldual(k, j) 
prntdlns  =  9 
end  if 

1  continue 

If  (1  . ne.  end)  then 

leftover  =  sixty  -  prntdlns 
do  7  k  =  1, leftover 
write  (7,911) 

7  continue 
end  if 

8  continue 

900  foraat  ('  ' ,///,Tl8, 'Regression  Output  for  Dependent' 

&  '  Variable:  ',A2) 

901  foraat  ('  ',//,T8,'  Model  Sub  of',T27,'  Error  Sub  of',T46, 

&  '  Total  Sua  of ' ) 

902  foraat  ('  ' ,T8, 'Squares  (SSR) ',T27, 'squares  (SSB)',T46, 

&  'Squares  (SSTO) ' ,T66, 'R-Square ' ) 

903  foraat  ('  '  ,/,lX,3(9X,P8.2,2X),T67,P6.4) 


904  format  ('  ' ,///,Tl5, 'For  ',A2,':  Residuals  Associated  with  The', 

&  '  Design  Points' ) 

905  format  (•  '  ,//,T4, 'Design  Point*  ,T20, 'ABM"s  Response’ ,T38, 

&  'Postulated  Model' 's  Response' ,T69, 'Residual ' ,/) 

909  format  ('  ' ,T8, I3,T24,F6 . 2,T49,F6 . 2,T70,F6 . 2) 

911  format  ('  •) 

912  format  ('  ' ,///,T20, 'Parameters  Of  ',A2, '  Sorted  In  Ascending', 
i'  Order ' ,/,T30, 'By  Their  Sum  Of  Squares') 

913  format  ('  ' ,//,T39, 'Type  I  Sum' ,T54, 'Percent' ,T65, 

& ' Summed  Percent') 

914  format  ('  ' ,T5, 'Number ' ,T15, 'Variable • ,T39, ' of  Squares', 

*T55,'Of  SSR',T69,'Of  SSR',/) 

916  format  ('  ' ,T5, I 3,T15, A8, A3, A8,T38, Fll . 3,T56, 2PF5. 2,T69 , 2PF6 . 2 ) 
close  (7) 
c 

c  No  more  to  print.  Bye. 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  WhchRspn( process, response, largest, j, i ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

lnteger*2  rspnstkn(5) 

common  /taken/rspnstkn 

integer  *  2  process , response ( 5 ) , largest , j , 1 

lnteger*2  k 

character  ending(5)#2,readcr*l 
logical  valid 

data  ending/ 'st ' , 'nd' , 'rd' , 2#'th'/ 
c 

c  Begin: 

c 

1  call  ScrlScrn(ll) 
print  5,  l,endlng(l) 
call  ScrlScrn(ll) 
read  (*,6,err=2)  j 

if  (j  .It.  1  .or.  j  .gt.  largest)  then 
c 

c  If  user's  input  is  not  an  integer  and  not  within  the  bounds, 

c  make  him/her  reenter. 


2  call  ScrlScrn(ll) 
print  7,  largest 
call  ScrlScrn(ll) 
accept  8,  reader 
go  to  1 

end  if 

rspnstkn(i)  =  j 
valid  =  .false, 
c  do  55  k  =  1,5 

c  print  *,  response(k) 

c  55  continue 
c  print  *,  process,! 

do  3  k  =  1, process 

If  (j  .eq.  response(k))  then 
valid  =  .true, 
end  if 

3  continue 

if  (valid)  then 
do  4  k  =  l,i 

if  (k  .ne.  1)  then 

if  (rspnstkn(k)  .eq.  rspnstkn(i))  then 
c 

c  If  the  user  tries  to  process  a  response  twice,  send  him/her 

c  back  to  the  beginning  to  reenter  his/her  answer, 

c 

call  ScrlScrn(lO) 
print  9,  j,k,ending(k) 
call  ScrlScrn(ll) 
accept  8,  reader 
go  to  1 
end  if 
end  if 

4  continue 
else 

call  ScrlScrn(ll) 
print  10,  j,ending(j) 
call  ScrlScrn(lO) 
accept  8,  reader 
go  to  1 
end  if 
c 

c  Format  Statements: 
c 

5  format  ('  ','What  is  the  ',I1,A2,'  response  objective  you  want', 

4'  to  output?' ) 

6  format  (I) 

7  format  ('  ', 'Value  has  to  be  an  Integer  between  1  and  ',11,'!!', 

4  /,'  Press  "return"  to  reenter  value:') 

8  format  (a) 

9  format  ('  ','You  have  already  entered  the  value  ',11,'  for  the  ', 
411, A2,'  response  objective!!',/,'  Press  "return"  to  reenter:') 

10  format  ('  ', 'Sorry!!  You  did  not  ask  for  the  ',11, A2 , '  response', 


4'  to  be  processed!',//'  Press  "return"  to  reenter:') 
c 

c  Just  checking  on  you: 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  ToScreen ( tot lcols, tot lrows, process, response, largest, 

4  begin, end, prntalso) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc cccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

double  precision  prcntage(153,5),ttlprcnt(153,5) 
comaon  /prcntage/prcntage, ttlprcnt 
double  precision  SrtdSSQs(153,5) 
comaon  /SrtdSSQs/SrtdSSQs 

character  srtnaael(153, 5)*8,srttlmes(153, 5)»3,srtname2( 153, 5)*8 

comaon  /SrtdVars/srtnaael,srttiaes,srtnaae2 

double  precision  SSE(5),SSR(5),SSTO(5),Rsqrd(5),AdjRsqrd(5), 

4  MSR(5),MSE(5),numrtrd£(5),dnmrtrd£(5) , totald£s(5),Fvalue(5), 

4  ParaSSQs(153,5) 

comaon  /statstcs/SSB,SSR,SSTO,Rsqrd,Ad jRsqrd,HSR,HSE,nuartrdf , 

4  dnartrdf, totaldfs, f value, Par mSSQs 

character  varnamel(153)*8,varnaae2{153)*8,times(153)*3 
comaon  /varnaaes/varnaael, var name 2, times 
double  precision  6(153,5) 
comaon  /theBatrx/B 
integer*2  rspnstkn(5) 
comaon  /taken/rspnstkn 
character *2  dpndntnm(5) 
common  /dpndntnm/dpndntnm 
double  precision  Y(385,5) 
common  /rspnsmtc/Y 
double  precision  XtlmesB(385,5) 
common  /XtlmesB/XtlmesB 
double  precision  ReslduaK  385,5) 
comaon  /resldual/Residual 

integer *2  tot lcols, tot lrows, process, response ( 5) , largest, begin, end 
character"!  prntalso 

integer" 2  1, j,k, twenty, lnsscrld, lnstoscl, nineteen 
character"!  reader , repeat, goodchar 
data  rspnstkn/5*0/ 


data  nlneteen/19/, twenty/20/ 

Begin: 

Allow  the  user  to  choose  which  objective  to  output, 
repeat  =  ' y* 

1  if  (repeat  .eq.  *y*  .or.  repeat  .eq.  *Y')  then 
do  8  l  =  l,end 
rspnstkni i )  =  0 
8  continue 

do  5  i  =  begin, end 

if  (process  .eq.  end)  then 
j  =  response(i) 
else 

call  WhchRspn( process, response, largest, j, i ) 
end  if 

call  ScrlScrn(7) 
write  (*,900)  dpndntna(j) 
write  (*,901) 
write  (*,902) 

write  (*,903)  SSR( j ) , SSB( j ) ,SSTO( j ) ,Rsqrd( j ) 

call  ScrlScrn(6) 

lnsscrld  =  20 

do  3  k  =  2,totlcols 

if  (lnsscrld  .le.  nineteen)  then 
lnsscrld  =  lnsscrld  ♦  1 

write  (*,917)  k-l,srtnaael(k, j),srttlaes(k, j), 

&  srtnaae2(k, j ) ,SrtdSSQs(k, J), 

&  prcntage(k, j ) ,ttlprcnt(k, j) 

else 

call  ScrlScrn(l) 

write  (*,912) 

call  ScrlScrn(l) 

accept  913,  reader 

write  (*,914)  dpndntna(j) 

write  (*,915) 

write  (*,916) 

write  (*,917)  k-l,srtnaael(k, j ) ,srttiaes(k, j), 

«  s r  t na»e  2 ( k , j ) , S  r  tdSSQs ( k , J ) , 

&  prcntage(k, j),ttlprcnt(k, j) 

lnsscrld  =  8 
end  if 

3  continue 

lnstoscl  =  nineteen  -  lnsscrld 
call  ScrlScrn( lnstoscl ) 
lnsscrld  =  20 
do  2  k  =  l,totlrows 

if  (lnsscrld  .le.  nineteen)  then 
lnsscrld  =  lnsscrld  *  1 

write  (*,909)  k,Y(k, j),xtiaesB(k, j),Residual(k, J) 
else 

call  ScrlScrn(l) 


.4, 


«■*  »■« 


write  (*,912) 
call  ScrlScrn(l) 
accept  913,  reader 
write  (*,904)  dpndntnm(j) 
write  (*,905) 

write  (*,909)  k, Y(k, j ) ,Xt imesB(k, j ) , Residual (k, j ) 
lnsscrld  =  6 
end  if 

2  continue 

lnstoscl  =  twenty  -  lnsscrld 
call  ScrlScrn< lnstoscl ) 
write  (*,912) 
call  ScrlScrn(l) 
accept  913,  reader 

5  continue 

6  call  ScrlScrn(ll) 

print  *,  'Do  you  wish  to  view  your  output  again?  (y/n)' 
call  ScrlScrn(ll) 
accept  913,  repeat 
call  ChckChar( repeat, goodchar) 
if  (goodchar  .ne.  * y ' )  then 
call  BadChar 
go  to  6 
end  if 
go  to  1 
end  if 

7  call  ScrlScrn(ll) 

print  *,  'Do  you  also  wish  to  print  your  output?  (y/n)' 
call  ScrlScrn(ll) 
accept  913,  prntalso 
call  ChckChar (prntalso, goodchar ) 
if  (goodchar  .ne.  ' y ' )  then 
call  BadChar 
go  to  7 


end  if 

900 

format 

(' 

' ,T18, 'Regression  Output  for  Dependent' 

Variable:  ' , A2 ) 

901 

format 

(' 

',//, T8,'  Model  Sum  of',T27,'  Error  Sum  of',T4$, 

& 

Total  Sum  of ' ) 

902 

format 

(' 

' ,T8, 'Squares  (SSR) *,T27, 'Squares  (SSB)',T46, 

Squares  (SSTO) ' ,T66, *R-Square' ) 

903 

format 

(’ 

' ,/, IX, 3(9X,F8 . 2, 2X) ,T67,F6 . 4 ) 

904 

format 

(' 

',T15,'For  ' , A2 , ' :  Residuals  Associated  With  The 

£ 

Design  Points' ) 

905 

format 

C 

' ,//,T4, 'Design  Point' ,T20, 'AEM' 's  Response ' ,T38, 

& 

Postulated  Model''s  Response ' ,T69, 'Residual ' ,/) 

909 

format 

(' 

' ,T8, I3,T24,F6 . 2,T49, F6 . 2,T70,F6 . 2 ) 

911 

format 

(' 

’) 

912 

format 

(' 

', 'Press  "return"  to  continue.') 

913 

format 

(a) 

914 

format 

(' 

' ,T20, 'Parameters  Of  ’,A2,'  Sorted  In  Ascending', 

£'  Order 

1 

9 

/,T30,'By  Their  Sum  Of  Squares') 

<1  o 


915  format  ('  ' ,//,T39, 'Type  I  Sum' ,T54, 'Percent' ,T6S, 

&' Summed  Percent') 

916  format  ('  ',T5, 'Humber ',T15, 'Variable', T39, 'of  Squares', 

rftc  inf  C CD  I  <PCQ  inf  CCD  I  /I 

917  format  ('  ',T5,I3,T15,A8,A3,A8,T38,F11.3,T56,2PP5.2,T69,2PP6.2) 

C 

c  Mo  more  to  print.  Bye. 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  For Dcode(paramtrs, totlcols, process, response) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  write  the  parameter  estimates  out  to  a  data  set  for  Input 

c  to  the  Decode  subroutine, 

c 
c 

c  Variables: 

c 

c 

character  varnamel(153)t8,varname2(153)*8,times(153)t3 

common  /varnames/varnamel, vatname2, times 

double  precision  B(153,5) 

common  /theBmtrx/B 

integer *2  response (5) 

lnteger#2  1, j,k,paramtrs, totlcols, process 
c 

Begin: 

open ( unlt=7, flle='codedbts. In' ,status=' old' ) 
write  (7,11)  paramtrs, totlcols, process 
do  1  k  =  1, totlcols 

write  (7,14)  varnameMk  ) , times ( k ) , varname2 (k  ) 

1  continue 
do  3  1  =  1, process 

j  =  response(l) 
write  (7,12)  J 
do  2  k  =  1, totlcols 
write  (7,13)  B(k,j) 

2  continue 

3  continue 
close  (7) 

c 

c  Format  statements: 


12  format  (lx, ID 

13  format  (1X,F9.5) 

14  format  (1X,A8,A3,A8) 


c  I'm  finally  finished  with  the  entire  Rgrssion  Subroutine: 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Fi ler r or ( f ilename, file indx, whlchone ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

integer*2  whlchone 

character  f llename*8, f ilelndx*4,readcr*l 
c 

c  Begin: 

c 

call  ScrlScrn(lO) 
if  (whlchone  .eq.  1)  then 
print  1,  filename, fl lei ndx 
else 

print  2,  filename, filelndx 
end  if 

call  ScrlScrn(lO) 
accept  3,  reader 

1  format  ('  ' ,'An  error  has  occurred  while  attempting  to  open  ', 

4'flle  ,A8,A4, '  Exit  this  program  and  ensure  the  file  ', 
i'exists  and  is  capable  of  being  read.',/,'  Press  "return":') 

2  format  ('  ','An  error  has  occurred  while  reading  the  data  in  ', 

4'file  "' ,A8,A4, '  Exit  this  program  and  ensure  that  data  ', 

4'exlsts  and  is  in  the  correct  format.',/,'  Press  "return":') 

3  format  (a) 
c 

c  Bye,  Bye: 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Subroutine  Decode 


c  c 

ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc ccccccccc 
c 
c 

c  Purpose:  Subroutine  Decode  decodes  the  estimated  parameter  estimates 
c  receives  the  regression  equation's  coefficient 

c  estimates,  which  were  estimated  with  coded  input,  and  transforms 

c  them 

c 
c 

c  Variables: 

c 

c 

integer *2  i ,k, paramtrs, totlcols, process, response! 5) , objct ive, 

6  thsedone ( 5 ) , prtrcntr 

character  dpndntnm(5)*2,doit*l,goodchar*l 
logical  filesok 

data  dpndntnm/ ' ¥1 ’ , • Y2 • , ' Y3 • ,  • Y4 ' ,  •  Y5 • / 
c 

c  begin: 

c 

filesok  *  .true. 

call  DecodeIn(paramtrs,totlcols, process, response, filesok ) 
if  (filesok)  then 

call  StghtFwd ( paramtr s , tot lcols , process , response ) 
k  *  0 

do  2  i  =  1, process 

objct ive  =  response(l) 

1  call  ScrlScrn(ll) 

print  3,  dpndntnm(objctlve) 
call  ScrlScrn(ll) 
accept  4,  doit 
call  ChckChar (dolt,goodchar) 
if  (goodchar  .ne.  • y * )  then 
call  BadChar 
go  to  1 
end  if 

if  (dolt  .eq.  'y*  .or.  dolt  .eq.  ' Y ’ )  then 
k  =  k  ♦  1 

thsedone (k)  =  objct ive 
call  InltVars (paramtrs, objct ive, tot lcols) 
call  Calclate(paramtrs,objctive) 
end  if 

2  continue 
prtrcntr  =  k 

call  DcdePrnt( paramtrs, tot lcols, thsedone, dpndntnm, prtrcntr ) 
end  if 
c 

c  Format  statements: 
c 

3  format  ('  ','Do  you  wish  to  decode  the  parameter  estimates  for', 


*'  response  objective  ' ,A2,'?  (y/n)') 

4  foraat  (a) 
c 

c  Decode  no  more 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Decodelniparaatrs, totlcols, process, response , filesok ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  obtain  all  input  used  by  the  Decode  Subroutine. 

c 

c 

c  Variables: 

c 

c 

double  precision  dlv( 16) ,ald(16) 
conon  /dlvalds/dlv,ald 
double  precision  lov(16),high(16) 
cowon  /lovhigh/lov,hlgh 

character  varnaaelf 153)*8/varnaae2(153)*8,tlaes(153)*3 

cowon  /varnaaes/var naae  1 ,  var naae 2 ,  t iaes 

double  precision  B(153,5) 

cowon  /theBatrx/B 

character's  thenaaes(16) 

co won  /TheMaaes/thenaaes 

Integer *2  paraatrs, totlcols, process, response! 5) 
integer*2  l, j,k,vhichone 
character  fllenaae'S.f  llelndxH 
logical  filesok 
c 

c  Begin: 
c 

vhichone  =  1 

open (unit =2, err =5, f lle='codedbts. in' ,status='old' ) 
vhichone  =  2 

read  (2,ll,err=5)  paraatrs, totlcols, process 
do  1  l  =  1, totlcols 

read  (2,14,err=5)  varnaael(i),tlaes(i),varnaae2(i) 

1  continue 

do  3  i  =  1, process 

read  (2,12,err=5)  response(i) 
j  =  response(l) 
do  2  k  =  1, totlcols 

read  (2,13,err=5)  B(k,j) 

2  continue 


3  continue 
close  (2) 
vhichone  =  1 

open  (unit=3,err=6,name='decode. in' ,status= ' old ' ) 

vhichone  =  2 

do  4  1  =  l,paramtrs 

read  (3,16,err=6)  thenamesl i ) , lov( 1 ) ,high( 1 ) ,mid( i ) ,div( i ) 

4  continue 
close  (3) 
go  to  17 

c 

c  Error  code: 
c 

5  if  (vhichone  .eq.  2)  then 

close  (2) 
end  if 

filename  =  ' CODEDBTS ' 
fllelndx  =  '.IN  ' 
go  to  7 

6  if  (vhichone  .eq.  2)  then 

close  (3) 
end  if 

filename  =  'DECODE' 
fllelndx  =  '.IN  ' 

7  call  Pllerror (filename, fllelndx, vhichone) 
filesok  =  .false. 

c 

c  Format  statements: 
c 

11  format  (IX, 12, IX, 13, IX, I 1 ) 

12  format  (IX, II) 

13  format  (1X,F9.5) 

14  format  (IX, AS, A3, A8) 

16  format  ( 1X,A8,2(1X,F7 .2) ,  2( 1X,F11.6) ) 
c 

c  I've  got  my  input,  so  there: 
c 

17  return 
end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  StghtFvd ( par amt r s, tot lcols , process , response ) 
c  c 

ccccccccccccccccccccccccccccccccccccccctcccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  Put  the  parameter  estimates  and  names  in  forvard  position, 

c  l.e.,  XO  XI  X2  X3  .  .  .  Xll  X 1 2  X13  .  .  .  X22  X23  .  .  .  X33. 


c 


Vac  tables: 


double  precision  B( 153, 5 ) 
coaaon  /theBatrx/B 
double  precision  frwdbeta(153,5) 
coaaon  /forwrdBs/frwdbeta 

character  varnaael(153)48,varnaae2(153)*8,tiaes(153)#3 
coaaon  /varnaaes/varnaael,var name 2, times 
character  £wdnaael(153)t8,fwdnaae2(lS3)t8,£wdtiaes(lS3)t3 
coaaon  /fwdnames/fwdnaael, £wdnaae2, £wd tlaes 
integer *2  paraatrs, tot lcols, process, response (5) 

Integer *2  l, j,k, 1, a, n, paraplus, indxl, indx2, llait 

Begin: 

Obtain  the  "coded"  parameter  estimates  in  forward  position 

paraplus  =  paraatrs  +  1 
do  4  i  =  1, process 
j  =  response! 1) 
frwdbeta! 1, j )  =  B(l,j) 
do  1  k  =  2, paraplus 

frwdbeta(k, j)  =  B(paraatrs+k, J) 
continue 
1  =  1 

indxl  =  paraatrs  +  1 
lndx2  *  (2  •  paraatrs)  +  1 
Halt  =  paraatrs 
do  3  a  =  1, paraatrs 
indxl  =  indxl  +  1 
1  =  1  +  1 

frwdbeta ( indxl, J)  =  B(l,j) 

Halt  =  Halt  -  1 
do  2  n  =  1, llait 
indxl  =  indxl  +  1 
lndx2  =  indx2  +  1 
£rwdbeta( indxl, j )  =  B(indx2,j) 
continue 
continue 
continue 

Obtain  the  paraaeter  naaes  in  forward  position 

fwdnaael(l)  =  varnaael(l) 
fwdtlaes(l)  =  tlaes(l) 
fwdnaae2(l)  =  varnaae2(l) 
do  5  k  =  2, paraplus 

fwdnaael(k)  =  varnaaeKparaatrs+k ) 
fwdtlaes(k)  =  tiaes(paraatrs+k ) 
fwdnaae2(k)  =  varnaae2(paraatrs+k ) 
continue 
1  =  1 


lndxl  =  paraatrs  4-  l 
lndx2  =  (2  4  paraatrs)  4  1 
Halt  =  paraatrs 
do  7  ■  =  1, paraatrs 
indxl  =  indxl  4  1 
1  =  14  1 

fwdnaaeli indxl)  =  varnaael(l) 
fwdtiaesi Indxl)  =  tiaes(l) 
fwdnaae2( indxl)  =  varnaae2(l) 

Halt  =  Halt  -  1 
do  6  n  =  l,llait 
Indxl  =  Indxl  4  l 
lndx2  =  lndx2  4  1 
fwdnaaeli  indxl)  =  varnaaeli  indx2) 
fwdtlaesi Indxl )  =  tlaes(lndx2) 
fwdnaae2( Indxl)  =  varnaae2( indx2) 

6  continue 

7  continue 
c 

c  Don't  be  forward  anyaore: 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Ini tVars( paraatrs, ob jet ive,totlcols ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  init  Decode's  "working"  variables. 

c 

c 

c  Variables: 

c 

c 

double  precision  frwdbeta( 153, 5) 
coaaon  /forwrdBs/f rwdbeta 

double  precision  cdebeta0,cllnbeta(16),ccrsbeta(136) 
coaaon  /cdedtras/cdebetaO,cl inbeta, ccrsbeta 
integer *2  paraatrs,objctive, totlcols 
lnteger*2  l, J, lndx,crsparas 
c 

c  Begin: 

c 

j  =  objetive 
c 

c  Obtain  the  "working*  BetaO  first: 


cdebetaO  =  £rwdbeta(l, J) 

Obtain  the  "working"  lineara  betas  second: 

do  1  i  =  l,paraatrs 

cllnbeta(l)  =  frwdbeta( l*l, J ) 

1  continue 

Coapute  the  nuaber  of  pure  and  cross  teras;  then  obtain  the  "working' 
quadratic  betas  third: 

crsparas  =  totlcols  -  (paraatrs  ♦  1) 
indx  =  paraatrs  *■  1 
do  2  i  =  1, crsparas 

ccrsbeta(l)  =  frwdbeta( lndx+i, j ) 

2  continue 

My  "working"  days  are  over: 

return 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Calc late ( paraatrs, ob jet ive ) 

c  c 

CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC 


Purpose:  To  calculate  the  decoded  paraaeter  estlaates. 


Variables: 


double  precision  div( 16 ) ,aid { 16 ) 
coaaon  /dlvalds/dlv,atd 

double  precision  cdebetaO, clinbeta(16),ccrsbeta(136) 

coaaon  /cdedtras/cdebetaO,cl Inbeta, ccrsbeta 

double  precision  beta0(5),beta(16,5),crssbeta(136,5) 

coaaon  /decdedBs/betaO,beta,crssbeta 

lnteger#2  paraatrs, ob jet ive 

double  precision  cllntras,ccrstras,tccrstra 

Integer *2  1, J,k, lncl, Inc 2, inc3,ad justl,ad Just  2, lndx 

Begin: 


Calculate  betaO 


k  =  ob jet Ive 
clintras  -  0.0 


tccrstra  =0.0 
indx  =  0 

do  12  1  =  1, paraatrs 
ccrstras  =  0.0 

clintras  =  clintras  +  (clinbeta(i)  *  (aid(i)  /  div(i))) 
do  13  j  =  1, paraatrs 
lndx  =  lndx  +  1 

ccrstras  =  ccrstras  +  (ccrsbeta! indx)  *  ald(j)  /  div(j)) 

13  continue 

ccrstras  =  ccrstras  *  (ald(i)  /  div(i)) 
tccrstra  =  tccrstra  <•  ccrstras 
12  continue 

betaO(k)  =  cdebetaO  -  clintras  +  tccrstra 
c 

c  Calculate  the  linear  betas 
c 

clintras  =  0.0 
ccrstras  =  0.0 
incl  =  0 
inc2  =  1 

adjust2  =  paraatrs  +  1 
do  14  i  =  1, paraatrs 
incl  =  1 

adjustl  =  paraatrs 
do  15  j  =  1, paraatrs 
if  (j  .It.  1)  then 

ccrstras  =  ccrstras  ♦  ( ccrsbeta ( incl)  *  aid(j)  /  div(j)) 
adjustl  =  adjustl  -  1 
incl  =  incl  *  adjustl 
end  if 

if  (1  .eq.  j)  then 

ccrstras  =  ccrstras  ♦  (ccrsbeta ( inc2 )  *  2  *  aid(i)  /  div(i)) 
Inc 3  =  lnc2 
adjust2  =  adjust2  -  1 
lnc2  =  lnc2  ♦  adjust2 
end  if 

if  (j  .gt.  1)  then 
inc3  =  inc3  ♦  1 

ccrstras  =  ccrstras  ♦  (ccrsbeta ( inc3)  •  ald(j)  /  div(j)) 
end  if 

15  continue 

beta(l,k)  =  (cllnbeta(i)  -  ccrstras)  /  dlv(l) 
ccrstras  =  0.0 

14  continue 
c 

c  Calculate  the  squared  and  cross  teraed  betas 
c 

indx  =  0 

do  16  l  =  1, paraatrs 
do  17  j  =  i, paraatrs 
lndx  =  lndx  ♦  1 

crssbeta( lndx,k )  =  ccrsbeta( indx)  /  (div(l)  *  dlv(J)) 

17  continue 
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16  continue 


c  Calc  or  not  to  Calc  -- 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  DcdePrnt(paraatrs, totlcols,thsedone,dpndntna,prtrcntr ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose:  To  print  the  decoded  parameter  estimates. 

c 

c 

c  Variables: 

c 

c 

character  fwdnaael (1531*8, fwdnaae2 ( 153 )*8, fwdtiaes ( 153 ) *3 

coaaon  /fwdnaaes/fwdnaael,  fwdnaae2,  fwdtiaes 

double  precision  beta0(5),beta(16,5),crssbeta(136,5) 

cowon  /decdedBs/betaO,beta,crssbeta 

double  precision  low(16),high(16) 

coaaon  /lowhlgh/low,high 

character^  thenaaes(16) 

coaaon  /TheNaaes/thenames 

Integer *2  paramtrs, totlcols, thsedone( 5) ,prtrcntr 
character^  dpndntna(5) 

Integer *2  1, j,k, lndx.crsstras, leftover, prntd Ins, sixty 
data  slxty/60/ 
c 

c  Begin: 

c 

c  Write  out  important  info  for  the  "XCUTBQNS"  subroutine: 

c 

open  (unit=4,naae=* xcuteqns  .  in' ,  status  = ' old ' ) 
write  (4,7)  paraatrs, tot lcols, prtrcntr 
do  8  1  =  l,paraatrs 

write  (4,9)  thenaaes (l),low(l),high(l) 

8  continue 
c 

c  Start  the  ball  a-rolllng: 

c 

open  (unlt=7,naae='decode.out',3tatus='old' ) 
do  12  k  =1, prtrcntr 
j  =  thsedone(k) 
write  (4,10)  j 


c 

c 


Now,  write  out  the  decoded  betas  in  print  foraat  (60  lines): 


Print  heading: 

write  (7,4)  dpndntna(j) 
prntdlns  =  6 

Print  BetaO  (the  intercept): 

write  (7,5),  fwdnamel ( 1 ) , fwdt imes ( 1 ) , fwdnaae2( 1 ) ,betaO( j ) 
write  (4,11),  betaO(j) 
prntdlns  =  prntdlns  +  1 

Print  the  linear  betas: 

indx  =  1 

do  1  i  =  l,paramtrs 
indx  =  indx  +  1 

write  (7,5),  fwdnaael( indx) , fwdt iaes( indx) , £wdname2( indx) , 

&  beta(i,j) 

write  (4,11),  beta( i, j ) 
prntdlns  =  prntdlns  ♦  1 

1  continue 

Print  the  quadratic  betas: 

crsstras  =  totlcols  -  (paraatrs  +  1) 
do  2  i  =  1, crsstras 

if  (prntdlns  .It.  sixty)  then 
indx  =  indx  +  1 

write  (7,5),  fwdnaaeH indx) , fwdtiaes( indx) , £wdnaae2( indx) 
&  crssbeta( l, j ) 

write  (4,11),  crssbeta( i , j ) 
prntdlns  =  prntdlns  ♦  1 
else 

indx  =  indx  ♦  1 
write  (7,4)  dpndntna(j) 

write  (7,5),  fwdna»el( indx) , fwdtiaes( indx), fwdnaae2( indx) 
4  crssbetad,  j) 

write  (4,11),  crssbeta( i, j ) 
prntdlns  =  7 
end  if 

2  continue 

Finish  the  page  out: 

leftover  =  sixty  -  prntdlns 
do  3  1  =  1, leftover 
write  (7,6) 

3  continue 
12  continue 


Foraat  stateaents: 


c 

4  format  ('  ',///, 'The  decoded  parameter  estimates  for  ',A2,'  are:', 

4//) 

5  format  ('  ' , 2X, A8,A3, A8, 2X,P18 . 12 ) 

6  format  ('  ') 

7  format  ( IX, 12, IX, 13, IX, II) 

9  format  (1X,A8,2(1X,F7.2) ) 

10  format  (IX, 11) 

11  format  (1X,F18.12) 
close  (4) 

close  (7) 
c 

c  I'm  printing  my  life  away  — 
c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Xcuteqns 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

character  dpndntnm<5) *2, yesno*l, goodchar *1, repeat *1 
Integer *2  l , paramtrs, tot lcols, process , response ( 5 ) , ob jet ive 
data  dpndntnm/ ' Y1 ' , ' Y2 ' , ' Y3 ' , '  Y4 ' , '  Y5 •  / 

c 

c  Begin: 
c 

call  Xecute In (paramtrs, tot lcols, process, response) 
do  4  i  =  1, process 
objctlve  =  response(l) 

1  call  ScrlScrn(ll) 

print  5,  dpndntnm(objctlve ) 
call  ScrlScrn(ll) 
accept  6,  yesno 
call  ChckChar (yesno, goodchar ) 
if  (goodchar  .ne.  ' y ' )  then 
call  BadChar 
go  to  1 
end  if 

if  (yesno  .eq.  ' y '  .or.  yesno  .eq.  'Y' )  then 
repeat  =  *  y  * 

if  (repeat  .eq.  ' y *  .or.  repeat  .eq.  ' Y ' )  then 
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Ji’  li1  Ji’  .*»**»''• 


.k-.'  J***  »»•»>’, 


.'J*'  ti’.U.Il  -l)fc 


call  userlnpt(paramtrs, totlcols) 

call  SetUpEqn(paramtrs) 

call  DoandShw(objctlve,dpndntnm, totlcols) 

3  call  ScclScrn(ll) 

print  7,  dpndntnm(objctive) 
call  ScrlScrn(ll) 
accept  6,  repeat 
call  ChckChar ( repeat, goodchar) 
if  (goodchar  .ne.  * y *  >  then 
call  BadChar 
go  to  3 
end  if 
go  to  2 
end  if 
end  if 

4  continue 

5  format  ('  ','Do  you  wish  to  execute  response  objective  ',A2,'?', 

4'  (y/n)') 

6  format  (a) 

7  format  ('  ','Do  you  wish  to  execute  response  objective  ',A2, 

4'  again?  (y/n)') 

So  long;  till  nex  time: 

return 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  Xecuteln(paramtrs, totlcols, process, response) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 


Purpose : 


Variables: 


double  precision  thebetas(153,5) 
common  /XecuteBs/thebetas 
double  precision  low( 16 ) ,high(16 ) 
common  /lowhigh/low,hlgh 
character *8  thenames(16) 
common  /TheNames/thenames 

integer* 2  i, j,k,paramtrs,totlcols,process,response(5] 
Begin: 


open  (unit=4,name='xcuteqns. in' ,status='old' ) 
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read  (4,7)  paraatrs,totlcols, process 
do  1  i  =  1, paramtrs 

read  (4,9)  thenames( i ) , low( l ) ,hlgh( i ) 

1  continue 

do  3  i  =  1, process 

read  (4,10)  response(l) 
j  =  response(l) 
do  2  k  =  l,totlcols 

read  (4,11)  thebetas(k, j) 

2  continue 

3  continue 
c 

c 

7  format  (IX, 12, IX, 13, IX, II) 

9  format  (1X,A8,2(1X,P7.2) ) 

10  format  (IX, II) 

11  format  (1X,P18.12) 
close  (4) 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  UserInpt(paramtrs,totlcols) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccc cccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

double  precision  lov(16),high(16) 
common  /lowhigh/lov,high 
character *8  thenames(16) 
common  /TheNames/thenames 
double  precision  varvlues(16) 
common  /varvlues/varvlues 
lnteger*2  i,paramtrs,totlcols 
characters  reader 
c 

c  Begin: 
c 

do  3  i  =  l,paraatrs 
1  call  ScrlScrn(ll) 

print  4,  lov( i ) , high ( i ) ,thenames( i ) 

call  ScrlScrn(ll) 

read  (*,*,err=2)  varvlues(i) 

if  (varvlues(l)  .gt.  high(l)  .or.  varvlues(l)  .It.  low(D)  then 
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call  Scrlscrn(ll) 
print  5,  low( i ) ,high(  i ) 
call  ScrlScrn(lO) 
accept  6,  reader 
go  to  1 
end  If 

3  continue 
c 

c  Format  statements: 

c 

4  format  ('  Within  the  range  of  '/F7.2,'  and  ',F7.2,',  what  is 
i' the  value  for  "',A8,'"?') 

5  format  ('  Input  has  to  be  a  real  value  within  the  limits  of 
SF7.2,'  and  ' ,F7 . 2 1 . ' ,/, '  Press  "return"  to  reenter.') 

6  format  (a) 
c 

c  Goodbye  user : 

c 

return 

end 

c 

c 

c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  SetUpEqn(paramtrs) 

c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 
c 

c  Purpose: 

c 

c 

c  Variables: 

c 

c 

double  precision  varvlues(16) 
common  /varvlues/varvlues 
double  precision  thevlues( 2:153) 
common  /thevlues/thevlues 
integer*2  i, j, indx,paramtrs 
c 

c  Begin: 
c 

do  1  i  =  l,paramtrs 

thevlues(  Ul)  =  varvlues(l) 

1  continue 

lndx  =  paramtrs  ♦  l 
do  3  i  =  1, paramtrs 
do  2  i  =  1, paramtrs 
lndx  =  lndx  +  1 

thevlues( lndx)  =  (varvlues(i)  *  varvlues(j)) 

2  continue 


u  o 


3  continue 

So  long: 

return 

end 


cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c  c 

Subroutine  DoandShv(objctlve,dpndntnm,totlcols ) 
c  c 

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc 
c 


Purpose: 


Variables: 


double  precision  thebetas(153,5) 
conon  /XecuteBs/thebetas 
double  precision  thevlues) 2:153) 
common  /thevlues/thevlues 
double  precision  theansvr 
integer*2  i, j,objctive,totlcols 
character*!  reader, dpndntnm) 5) *2 

Begin: 

j  =  objctlve 

theansvr  =  thebetasd,  j) 
do  1  i  =  2,totlcols 

theansvr  =  theansvr  *  (thevlues(l)  *  the betas) i, j ) ) 

1  continue 

call  ScrlScrn(ll) 

print  2,  dpndntnmt j), theansvr 

call  ScrlScrn(ll) 

accept  3,  reader 

Format  statements: 

2  format  ('  ','For  ',A2,',  survey  says:  *,F6,2,/, 

S'  Press  "return":') 

3  format  (a) 

Parting  is  such  sveet  sorry: 


return 

end 


*j»»P<nx  C;  BgHed-A»  Program  User* 8  guide 


Since  the  automation  program  Is  written  In  Fortran-77  and  executed 
on  the  VAX  11/785,  the  program  Is  started  by  typing  "RUM  RSMBDABH.BXE" 
on  a  CRT  terminal.  The  automated  RSM  program  Is  designed  to  interact 
with  the  user,  so,  after  starting  the  program,  a  main  menu  will  appear 
(Figure  4.9).  The  main  menu  Is  used  as  a  guide  to  show  the  sequential 
execution  of  the  RSMed-AEM  program. 

Input  Data 

By  selecting  I,  the  INPTDATA  subroutine  is  invoked  allowing  the 
user  to  enter  all  pertinent  data  (Figures  4.6  and  4.8)  for  the  variables 
of  interest  (design  variables).  Once  the  INPTDATA  subroutine  is 
executed,  the  user  Is  asked  a  series  of  questions,  dependent  upon  the 
user's  last  response. 

The  user  is  first  asked  whether  or  not  the  characteristics  of  the 
design  variables  already  reside  In  the  VARIBLBS.DAT  file,  if  the  design 
variable  Information  does  not  exist,  the  program  queries  the  user  for 
the  Information.  The  user  Is  asked  to  Input  the  number  of  design  vari¬ 
ables,  their  names,  their  low  and  high  values,  and  the  number  of  ABH 
variables  each  design  variable  controls.  All  Input  Is  checked  for  logic 
and  limit  errors.  An  example  of  a  logic  error  is  a  design  variable's 
high  value  can  not  be  less  than  Its  low  value.  A  limit  error  will  occur 
when  no  Box-Behnken  experimental  design  exists  for  the  number  of  design 
variables  of  Interest.  If  the  user  can  not  use  the  existing  experi¬ 
mental  designs,  he/she  is  allowed  to  exit  the  INPTDATA  subroutine. 


Whether  the  characteristics  of  the  design  variables  already  reside 
In  the  VARIBLBS.DAT  file  or  Is  entered  via  the  CRT,  the  information  is 
gathered  in  a  table  and  shown  to  the  user  via  the  CRT.  The  user  is 
asked  to  verify  that  all  data  Is  correct.  If  not,  the  user  is  allowed 
to  change  either  a  variable's  name,  low/high  value,  or  the  number  of  AEH 
variables  it  controls. 

Once  verification  is  complete,  the  INPTDATA  subroutine  creates 
three  files  (CODBDSGN. IN,  DBCODB.IN,  and  RGRSSIOM.IN)  that  are  used 
later  in  the  RSMed-ABM  program  (refer  to  Appendices  G,  H,  and  I).  After 
those  three  files  are  created,  the  user  is  allowed  the  opportunity  to 
save  the  design  variable  information  in  the  file  VARIBLBS.DAT.  Any 
Information  already  in  that  file  is  written  over.  The  main  menu 
reappears  once  the  INPTDATA  subroutine  finishes  its  tasks. 

Pwlld  Uncoded/Codcd  Design 

By  selecting  either  U  or  C  from  the  main  menu,  the  CODBDSGN 
subroutine  is  Invoked.  The  CODBDSGN  subroutine  does  not  Interact  with 
the  user.  Its  function  is  to  create  an  experimental  design  file,  coded 
or  uncoded,  dependent  upon  which  selection,  C  or  U  respectively,  the 
user  picks. 

With  the  selection  of  U,  the  CODBDSGN  subroutine  reads  the  infor¬ 
mation  from  the  CODBDSGN. IN  file  and  creates  an  uncoded  experimental 
design  file  entitled  ABM. DAT  (Appendix  J).  Once  the  ABM. DAT  file  is 
created,  the  main  menu  reappears.  The  RSMed-ABM  program  should  now  be 
exited  (l.e.,  selection  B),  and  the  DATACLCT.COM  program  executed  (Tool 
Two  of  Appendix  D) . 


with  the  selection  of  c,  the  CODBDSGN  subroutine  reads  the  infor¬ 
mation  from  the  CODBDSGN. IN  file  and  creates  a  coded  experimental  design 
file  entitled  DSGNMTRX. IN  (Appendix  N)  to  be  used  with  the  RGRSSION 
subroutine.  Once  the  DSGNMTRX. IN  file  is  created,  the  main  menu  reap¬ 
pears.  Cmmtiom:  Do  not  build  the  uncoded  and  coded  files  at  the  same 
time.  Build  the  uncoded  file  first  (selection  U);  exit  the  RSHed-AEM 
program  (selection  B)  to  use  the  DATACLCT.COM  program  (Appendix  D);  and 
then  restart  the  RSHed-ABN  program  to  build  the  coded  file  (selection 
C).  To  do  else  may  result  in  an  error. 

By  selecting  R  from  the  main  menu,  the  RGRSSION  subroutine  is 
executed.  The  RGRSSION  subroutine  uses  previously  created  files  to 
calculate  some  regression  information.  The  information  consists  of  the 
model,  error,  and  total  sum-of -squares  statistics,  the  R-Squared 
statistic,  and  the  parameter  estimate  for  each  term  in  the  postulated 
equation.  Also,  to  help  the  user  decide  how  to  reduce  a  full  postulated 
equation,  the  terms  of  the  postulated  equation  are  sorted  in  ascending 
order  by  their  contribution  to  the  model  sum-of -squares.  Finally,  a 
listing  of  the  ABM  response,  postulated  model  response,  and  their 
difference  (residual)  is  listed  per  design  point. 

After  invoking  the  RGRSSION  subroutine,  the  RGRSSION. IN  and 
DSGNMTRX. IN  files  are  used  for  input  (Appendices  I  and  N  respectively). 
However,  the  RGRSSION  subroutine  also  requires  input  through  user  inter¬ 
action.  The  first  question  asked  the  user  is  "How  many  response 
objectives  (total)  are  there?  (max  of  5)".  The  RGRSSION  subroutine 
needs  to  read  the  R88PMSBS . IN  file  (Appendix  M)  but  first  needs  to  know 


how  many  objectives  per  line  there  are  In  the  file.  Therefore,  the  user 
■ust  Input  the  total  number  of  objectives  that  are  In  that  file. 

After  all  Input  files  are  read,  the  program  continues  to  query  the 
user  for  more  Information.  The  user  Is  asked  to  supply  how  many  of  the 
total  objectives,  and  In  what  order  he/she  wishes  to  process  them 
through  the  RGRSSION  subroutine.  Also,  the  user  is  allowed  the  ability 
to  delete  terms,  except  the  INTERCEPT,  If  he/she  so  desires.  (This 
ability  is  used  for  reducing  the  full  postulated  model.)  Next,  the  user 
Is  given  the  choice  of  viewing  the  regression  output  directly  by  screen 
and/or  writing  it  to  file  for  printing  later  (RBGRBSS.DAT  --  Appendix 
0).  Finally,  for  output,  the  user  is  allowed  to  vlew/prlnt  all  or  just 
some  of  the  processed  objectives. 

After  all  user  Interaction  Is  complete,  the  CODEDBTS . IN  file 
(Appendix  P)  Is  created  for  use  with  the  DBCODB  subroutine.  The 
CODBDBTS . I N  file  contains  the  parameter  estimates  for  each  term  In  the 
postulated  equation,  only  In  coded  form.  Once  the  RGRSSION  subroutine 
Is  complete,  the  main  menu  reappears. 

Decode 

By  selecting  D,  the  DBCODB  subroutine  Is  started.  The  DBCODB 
subroutine  decodes  the  coded  parameter  estimates  from  the  CODBDBTS. IN 
file.  The  DBCODB. IN  and  CODBDBTS. IN  files  are  used  as  Input  (Appendices 
H  and  P  respectively).  Interactive  input  from  the  user  Is  used  for 
controlling  which  objectives  are  decoded.  The  decoded  output  Is  written 
to  two  files:  DBCODB. OUT  for  possible  printing  and  XCUTBQNS.IN  for  use 
with  the  XCUTBQNS  subroutine  (Appendix  T  and  S  respectively).  Once  the 
DBCODB  subroutine  Is  finished,  control  Is  passed  back  to  the  main  menu. 


A  selection  of  X  froa  the  main  aenu  executes  the  XCUTBQN8  subrou¬ 
tine.  The  XCUTBQMS  subroutine  Is  not  a  part  of  the  autoaated  RSMed-ABM 
process  even  though  It  Is  Included  within  the  RSMed-ABH  program.  The 
XCUTBQMS  subroutine  Is  an  added  feature  that  gives  the  user  the  ability 
to  execute  the  estimated  equation.  The  XCUTBQMS  subroutine  reads  the 
XCUTBQNS.IN  (Appendix  S)  file  as  Input  and  sets  up  a  matrix  containing 
the  terms  to  each  response  objective's  estimated  equation  (as  long  as 
that  response  objective  was  processed  through  the  RGRSSION  subroutine). 
The  user  Is  next  asked  to  Interactively  add  to  the  Input.  He/she  Is 
first  asked  which  response  objective's  estimated  equation  Is  to  be 
executed.  Next,  the  user  Is  asked  to  Input  a  value  for  each  design 
variable.  The  RSMed-ABM  program  Insures  the  user  Input  Is  within  the 
bounds  for  each  design  variable.  The  output,  the  response  to  the  esti¬ 
mated  equation  given  the  variable  values,  Is  printed  to  the  screen.  The 
user  can  continue  executing  the  estimated  equation  until  he/she  Is 
finished.  Once  finished,  the  main  menu  reappears. 


lBfifMU.fi!  Ha  —  Ttrt  Program 


The  DATACLCT.COH  program  Is  written  In  the  VAX  11/785  digital 
coamand  language.  DATACLCT.COH  controls  the  data  collection,  used  with 
the  RGRSSION  subroutine  of  the  RSHed-ABH  program,  by  automatically 
executing  the  ABH  and  then  collecting  and  storing  the  required  data  from 
each  execution  In  a  file  called  STORAGE.DAT  (Appendix  L).  The 
DATACLCT.COH  program  uses  the  IABH1.DAT  file  (Appendix  B)  and  the 
ABH. DAT  file  (Appendix  J)  as  Inputs. 


$  WRITS  SYSSOUTPUT  " 

$  writs  syssoutput  •• 

$  INQUIRE  RBPS  "Enter  the  number  of  repetitions  and  press  return" 

$  WRITS  SYSSOUTPUT  •• 

8  WRITE  SYSSOUTPUT  ■■ 

$  WRITS  SYS80UTPUT  "Do  you  wish  to  be  queried  on  program  continuation  after  " 
$  INQUIRE  QUERY  "each  repetition?  fy/n)" 

$  FIRST  *  "  TNUHB(1,1)" 

$  SECOND  =  ■  TNUHB( 15, 1" 

$  THIRD  =  " 

$  COUNTER 1  =  0 
$LOOPl: 

$  COUNTER 1  =  COUNTER 1  +  1 
$  WRITE  SYSSOUTPUT  "" 

$  WRITE  SYSSOUTPUT 

S  WRITS  SYSSOUTPUT  "Repetition  Number  "COUNTBR1'  " 

S  WRITE  SYSSOUTPUT  "" 

$  WRITE  SYSSOUTPUT  "" 

$  OPEN  UPDTDATA  ABH. IN 
$  OPEN/ WRITS  TMPFILB1  TBMPl.DAT 
$  READ  UPDTDATA  RECl 
S  READ  UPDTDATA  RBC2 
SLOOP2: 

$  RBAD/BND_OF_FILB=BNDLOOP2  UPDTDATA  RBC3 
$  WRITS  TMPPILEl  RBC3 
S  GOTO  LOOP 2 
SBNDLOOP2: 

S  CLOSE  UPDTDATA 
$  CLOSE  TMPFILB1 
S  COPY  TBHP1.DAT  ABH. IN 
S  OPEN  ASH INPUT  I ABH 1 . DAT 
S  OP BN /WRITE  THPFILB2  TEMP 2 . DAT 
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9  COUNTER 2  *  0 
$ LOOP 3: 

$  RBAD/EMD_OF_F I LB=BNDLOOP 3  ABN INPUT  TRNSFRBC 
$  COUNTER 2  =  COUNTER 2  ♦  1 

9  IP  COUNTER 2  .BQ.  41  .OR.  COUNTER 2  .BQ.  42  THEM  GOTO  IMSRTRBC 
$  WRITE  TMPFILB2  TRNSFRBC 
$  GOTO  LOOP 3 
$  INSRTRBC: 

$  IF  COUNTBR 2  .BQ.  41  THEN  WRITE  TMPFILB2  RBCl 

$  IF  COUNTBR 2  .BQ.  42  THEN  WRITE  TWPIL82  RBC2 

$  GOTO  LOOP 3 
9EMDLOOP3: 

$  CLOSE  ABM INPUT 
$  CLOSE  TMPPILB2 
9  COPY  TEHP2.DAT  IABMl.DAT 
$  PURGE 

$  DBFI NE/USBR_MODB  SYS$INPUT  SYS9COHMAND 

9  AIM 

9  WRITS  SYS90UTPUT  M 

9  WRITE  SYS90UTPUT  ■■ 

9  OP BN  IN  OABHl.DAT 
$ LOOP 4: 

9  RBAD/BND_OF_F I LB= ENDLOOP 4  IN  NAHB 
9  CHECK »F9EXTRACT( 0,12, NAME) 

9  IF  CHECK  .BQS.  FIRST  THEN  LINB1  =  F9BXTR ACT ( 13,68, NAHB) 

9  IF  CHECK  .BQS.  SECOND  THEN  LINE2  *  F9EXTRACT (14,10, NAME ) 

$  IF  CHECK  .BQS.  THIRD  .AND.  PSBXTRACT( 82, 1,NAHE)  .BQ.  1  - 
THEN  LINB3  -  F9BXTRACT (96,6, NAME ) 

$  IF  CHBCK  .BQS.  THIRD  .AND.  F8BXTRACT( 82, 1, NAHB)  .BQ.  2  - 
THEN  LINE4  »  F$BXTRACT(96,6,NAMB) 

8  IF  CHBCK  .BQS.  THIRD  .AMD.  F9BXTRACT (82,1, NAHB )  .BQ.  3  - 
THBM  LINES  *  F9EXTRACT(96,6,MAHE) 

$  IF  CHBCK  .BQS.  THIRD  .AMD.  F$BXTRACT( 82, 1,NAMB)  .BQ.  4  - 
THBM  LINB6  *  F$ EXTRACT (9 6, 6, NAME ) 

$  IF  CHECK  .BQS.  THIRD  .AND.  F9BXTRACT (82,1, NAME )  .BQ.  5  - 
THBN  LINB7  =  F$BXTRACT( 96 , 6 , NAHB ) 

$  GOTO  LOOP 4 
9BNDLOOP4: 

8  CLOSE  IN 

9  TEMPFR8T  =  LINB1  ♦  LINB2 

9  PR8TLINB  =  F8BXTR ACT (0,4, TBMPFRST )  ♦  F9BXTRACT( 5, 4,TBHPFRST)  4  - 
P9SXTRACT (10,4, TBMPFRST ) +P9BXTRACT (15,4, TBW»FRST ) 4 F9EXTR ACT (20,4, TBMPFRST )  4 
F$EXTRACT( 25, 4, TBMPFRST )+F9EXTRACT( 30, 4,TBMPPRST) 4P$BXTRACT( 35, 4, TBMPFRST)  ♦ 
F8BXTRACT ( 40,4, TEMPPR8T ) ♦F9BXTRACT (45,4, TBMPFRST ) +F9BXTR ACT (50,3, TBMPFRST )  4 
F9EXTRACT( 54, 3, TBMPFRST ) +F8BXTRACT (58,4, TBMPFRST ) 4F9BXTRACT( 6 3,4, TBMPFRST )  4 
F9BXTR ACT ( 68,4, TBMPFRST ) *F$BXTRACT (73,4, TBMPFRST ) 

9  LASTLINB  =  LIMB3  4  LINB4  4  LINB5  4  LINB6  4  LINB7 
9  OPBM/APPBMD  OUT  RBG.IN 

8  WRITE  OUT  FRSTLINB 

9  WRITE  OUT  LASTLINB 
8  CLOSE  OUT 

8  IF  COUNTBR 1  .BQ.  RBPS  THBM  GOTO  FINISH 

9  IF  QUERY  .MBS.  "Y"  THBN  GOTO  LOOP1 


S  WRITB  SYSSOUTPUT  ■■ 

$  WRITE  SYSSOUTPUT  "" 

$  INQUIRE  ANSWER  "Do  you  wish  to  continue?  (y/n)" 

$  IP  ANSWER  .EQS.  "Y”  THEN  GOTO  LOOP1 
SPINISH: 

$  OPEN  RESULTS  REG. IN 
$  OPBN/APPBND  STORAGE  STORAGE. RES 
SLOOPS: 

$  RBAD/BND_OP_PILB=BNDLOOP5  RESULTS  RBSLTRBC 
$  WRITE  STORAGE  RBSLTRBC 
$  GOTO  LOOP 5 
SBNDLOOPS: 

$  CLOSE  RESULTS 
$  CLOSE  STORAGE 
$  COPY  NULL . DAT  REG. IN 
$  RMAINING  =  REPS  -  COUNTER 1 
$  WRITE  SYSSOUTPUT  "* 

$  WRITE  SYSSOUTPUT  ■■ 

$  WRITE  SYSSOUTPUT  "You  have  1 'RMAINING1  repetitions  left 
$  WRITE  SYSSOUTPUT 
S  WRITE  SYSSOUTPUT  ■■ 

$  EXIT 


ftMwndix  is.  ft*  1WQ.PAT  Hie 


The  l ABM . DAT  file  is  the  Input  tile  for  executing  the  ABM.  The  ABM 
code  foe  the  ABM  variables  (weapons  in  this  example  --  i.e.,  target 
base,  targeting  strategies  and  priorities,  and  dependent  variables) 

■ake  up  the  sain  Ingredients  of  the  ABH  input  file. 


$AGOGO 

c 

C  Scenario  Variables/Definitions 
C 

TITLB=ABM  Input  Pile  Por  Thesis  Testing, 

WEP(1)*16, 

BTARGT( 1 , 1 ) =MMI I , MMI I I , PKBBP, MICBM, P0SC3 , P08TRIC4 , TRI D5, B52GRV, B52SRN, B52CMC 
BTARGT( 11, 1)2PB111SRM,FB111GRV, B1BGRV, B1BSRM, BlBALCM, ATB, 

BTARGT(1, 2)=CIVIL,LOCAL,C3l , APBA8B, ICBM  SILO, LCC, MICBM, NUKSTOR, SUBPT8, 

BT ARGT (10, 2 )=SS-20, STORES, ?ACIL,DBPOS, NAVAL, PACTOR, POL, ENERGY, 

WCNAMB( 1 ) 2 BLUB_WB APON 8 , BICBM, BSLBM, BBOMBBR , BP AST , BSLOW, 

BLUB  W1AP0N8*1-1$, 

BICBM=l-4, 

BSLBM*5-7, 

BBOHBER=8-16, 

BFAST*l-7, 

B8LOW=8-16, 

TCMANBd )  =RBD_TARGBTS ,  RLC3I ,  RMUC,  RCOHV,  RI MD,  RTI MKURGBMT, 

RBD  TARGBTS=1-17, 

RLC3l=l-3, 

RNUCS4-10, 

RC0NV=11-14, 

RIND=15-17, 

RTIME_URGBNT=3-6,9, 

C 

C  Print  Variables:  Suppress  aost  ABM  print 
C 

HEDGE  PRIMT=-2,-3, 

IMPUT  PRINT— 2, 

RESULT  PRINT— 1,-2, -3, -4, -5, -6, -7, -8, -9, -10, -11, -12, -13, -14, 

STRIKE  PRINT— 1, 

TARGET  PRINT— 1,-2, -3, 

WEAPON  PRINT— 1,  -2,  -  3,  -  4, -5, -6, -7, -8, -9,-10, 

C 

C  Weapon  Variables  (Side  1) 

C 

BTARGTd,  1)«HHII,MMIII, PKBBP, MICBM, POSC3,POSTRIC4, TRID5, B52GRV, BS 2SR*  *  » 

JTYPB(1, 1 )  *  1,  1,  1,  t,  2,  2,  2,  3, 


MiiiMMuuMUMiuminiifinuMLNUiniuuuugv  KRUUIUlWlJIURViUfV! 
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c 

* 

t 

* 

t 


5 


\ 

* 

* 

I 

I 


TMUMB(1,1)- 

77, 

no, 

45, 

10,  190, 

250,  10, 

5, 

Sr 

42, 

CIP(1,1)« 

•  2, 

.135, 

.05, 

.07,  .24, 

.24,  .07, 

.6, 

.2, 

.054, 

YIBLD(1,1)> 

1.2, 

.34, 

.34, 

.34,  .05, 

.1,  .34, 

1* 

.2, 

•  2, 

AV(1,1)- 

.98, 

.98, 

.98, 

.98,  .8, 

.8,  .8, 

.85, 

.85, 

.85, 

WHPC(1,1)- 

1# 

3/ 

10, 

1,  io. 

8,  8, 

4, 

4, 

12, 

PLS(1,1)- 

.8/ 

.6, 

.8, 

.8,  .9, 

.925,  .95, 

.9, 

•9, 

9, 

PTP(1,1)= 

1, 

1» 

1, 

1,  1, 

1,  1, 

.6, 

.6, 

.71, 

RL(1,1)= 

.85, 

•o. 

.9, 

.85,  .8, 

.8,  . 85, 

.8, 

.75, 

BTAKOT(ll,l) 

-FB111SRM,FB111GRV, BlBGRV, BlBSRM, BlBALCM,  ATB, 

JTTP1(11,1)- 

3, 

3, 

3/ 

3,  3,  3, 

TMUMB! 11,1)= 

33, 

33, 

95, 

95,  95,  102, 

CBP(11,1)= 

.2, 

•2, 

.15, 

.10,  .054,  .05, 

YISLD(U,1)  = 

2, 

1, 

1* 

.2,  .2,  .5, 

AV(11,1)= 

.85, 

.85, 

.85, 

.85,  .85,  .85, 

VHPC(U,l)  = 

4, 

2, 

4, 

4,  8,  12, 

PLS!11,1)= 

.9, 

•9, 

•95, 

.95,  .95,  .95, 

PTP(11,D- 

.67, 

.67, 

.84, 

.84,  .84,  .95, 

RL(11,1)= 

r* 

.85, 

.8, 

.85, 

.85,  *8,  .85, 

V 

C  Target  Base/Variables 

C 

(Side  2) 

BTARGT! 1,2) -CIVIL, LOCAL,  C3I ,AFBASB,ICBH  SILO,  LCC,HICBH,NUK8T0R,SUBPTS, 


TCAT(1,2)= 

3, 

3,  2,  1, 

lr  2, 

lr 

2r 

2, 

THIMBU, 2)  = 

140, 

215,  450,  70, 

640,  120, 

150, 

50, 

20, 

R95(l,2)= 

.28, 

.245,  0,  .395, 

0,  0, 

o. 

o. 

.18, 

VAL (1,2)= 

lr 

lr  lr  lr 

lr  lr 

lr 

lr 

lr 

HARD! 1,2)- 

24Q0, 

13P1,35P7,  10Q1, 

52P8,39P0, 

30, 

39P5, 

22P1, 

BTARGT! 10,2) -SS-20, 

STORES,  FAC  I  L,DBPOS,l 

NAVAL, FACTOR, 

POL,BMRGY, 

TCAT(10,2)> 

lr 

2,  2,  2, 

2,  3, 

3r 

3r 

THUNB(10,2)= 

400, 

430,  520,  550, 

130,  1100, 

1300, 

435, 

R9  5  (10,2)=« 

o, 

0,  .165,  .28, 

.2,  .245, 

o. 

•llr 

VAL(10, 2)= 

lr 

lr  lr  lr 

lr  lr 

lr 

lr 

HARD! 10,2)- 

11P0, 

31P6,  23Q0,  16Q0, 

18P0,  14Q0, 

10P0, 

18P0, 

C 

C  Targeting  Strategies: 
C 


C  Strategy  One  and  Two: 

C 

IMPACT  FLAG-10, 

IMPACT! 1,1) -16*3, 

C 

c  Strategy  Three : 

C 

CDM( 1,2)—  • 0 ,  *0,  >8,  >8,  *8,  *0,  »8,  *0,  *0# 

CDM(10,2)>  .0,  .7,  .7,  .7,  .7,  .6,  .6,  .6, 

C 

C  Strategy  Four: 

C 

ALLOV( 3, 2) -1-7, 

ALLOW! 4, 2) -1-7, 

ALLOW! 5, 2) =1-7, 

ALLOW! 6, 2) -1-7, 

ALLOW! 7, 2) -13, 14, 16, 
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ALLOV(9,2)*l-7, 

ALLO¥(10,2)=13,14,16 

C 


! 

* 


C  Value  Accounts  (The  Dependent  Variables) 

C 

ATASK(l,l)-LC3l  TROTS, NUC  TROTS, COKV  TROTS, IND/BCON  TRO, TOTAL  TROTS, 
ACCOUNT ( 1,1 )>VALUI  DRST  ON  (RLC3I)  BY  (ALL)  MUST  BR  LB  1, 

ACCOUNT ( 2, 1)*VALUR  DMT  ON  (RNUC)  BY  (ALL)  MUST  BB  LB  1, 

ACCOUNT ( 3,1) *VALUR  DMT  ON  (RCOW)  BY  (ALL)  NU8T  BB  LB  1, 

ACCOUNT ( 4, D-VALUB  DMT  ON  (RIND)  BY  (ALL)  MUST  BB  LB  1, 

ACCOUNT ( 5, 1)*VALUI  DMT  ON  (ALL)  BY  (ALL)  MU8T  BB  LB  1, 

C 

C  Weapon  Hedges  (Targeting  Priorities) 

C 

TASK (1,1) "TINS  URGRNT,RMT  OP  LC3l,RMT  OP  NUC,COW  DAMAOB, IND  DAMA0B, 
TASK (6,1) *ALL  TARGETS, 

HBDOB(  1, 1 ) "TARGETS  OP  TYPB  (RTIMBJJRGBNT)  BY  (BICBM,MLBN)  MUST  BB  BQ  1 
HBDGB( 2, 1 ) "TARGETS  OP  TYPB  (1,2)  BY  (ALL)  MUST  BB  BQ  1, 
NBDGR(3,l)«TAROBTS  OP  TYPB  (7,8,10)  BY  (ALL)  MUST  BB  IQ  1, 

HRDGB( 4,1) "TARGETS  OP  TYPB  (RCOW)  BY  (ALL)  MU8T  BB  BQ  1, 

HBDOB (5,1) "TARGETS  OP  TYPB  (RIND)  BY  (ALL)  HU8T  BB  IQ  1, 

HBOGB (6,1) ■ VALUB  DB8T  ON  (ALL)  BY  (ALL)  MUST  BQ  1, 

PRIORITY( 1, 1)*-1, -2,-3,-4, -5,-6, 

0 


Ip— dii  tL  Aft  *MT  Eilft 

The  VARIBLB8.DAT  file  eaves  the  design  variable  Information  entered 
with  the  IMPTDATA  subroutine  If  the  user  so  desires.  By  line,  the  first 
column  contains  the  name  for  the  design  variable;  the  second  and  third 
colons  give  the  range,  low  and  high  respectively,  of  the  design 
variable;  and  the  fourth  colun  shows  how  many  ABN  variables  are 
controlled  by  the  design  variable. 


MMII 

0.00 

450.00 

1 

min 

100.00 

550.00 

1 

PKBSP 

0.00 

100.00 

1 

MI  CBN 

0.00 

200.00 

1 

POSC  3 

176.00 

304.00 

1 

P08TBIC4 

240.00 

384.00 

1 

TRID5 

0.00 

336.00 

1 

B-S2PBN 

0.00 

156.00 

2 

B-S2CMC 

40.00 

156.00 

1 

FBlllPBN 

0.00 

60.00 

2 

BIB 

30.00 

100.00 

3 

ATB 

0.00 

124.00 

1 

114 
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toidii  ql  m.  wms&Lm.  cu& 

The  COMMON.  II  file  la  created  froa  the  MPTDATA  subroutine.  The 
first  line  gives  the  nuaber  of  design  variables  processed  through  the 
INPTDATA  subroutine.  By  coluan,  the  following  lines  list  each  design 
variable's  low,  aid,  and  high  values  for  Its  range  along  with  the  nuaber 
of  AIN  variables  that  each  design  variable  controls. 


12 


0.00 

225.00 

450.00 

1 

100.00 

325.00 

550.00 

1 

0.00 

50.00 

100.00 

1 

0.00 

100.00 

200.00 

1 

170.00 

240.00 

304.00 

1 

240.00 

312.00 

384.00 

1 

0.00 

1(8.00 

33(.00 

1 

0.00 

78.00 

15(.00 

2 

40.00 

98.00 

15(.00 

1 

0.00 

30.00 

(0.00 

2 

30.00 

(5.00 

100.00 

3 

0.00 

(2.00 

124.00 

1 

The  DBCOOB.IM  file  is  created  froa  the  IHPTDATA  subroutine.  The 


first  coluan  show  the  naaes  given  each  design  variable.  Coluans  two 
and  three  list  each  design  variable's  range,  low  and  high  values 
respectively.  The  fourth  and  fifth  coluans  pertain  to  equation  2.3. 
The  fourth  coluan  gives  the  aidpolnt  of  each  design  variable's  range 
(the  A  variable  of  eqn  2.3),  and  the  fifth  coluan  lists  the  value  for 
the  denoainator  of  eqn  2.3  for  each  design  variable  (the  B  variable). 


Mill 

0.00 

450.00 

225.000000 

225.000000 

(Mill 

100.00 

550.00 

325.000000 

225.000000 

PUB* 

0.00 

100.00 

50.000000 

50.000000 

MICBM 

0.00 

200.00 

100.000000 

100.000000 

P08C3 

176.00 

304.00 

240.000000 

64.000000 

POSTS I C4 

240.00 

304.00 

312.000000 

72.000000 

TRID5 

0.00 

336.00 

161.000000 

168.000000 

B-S2PBM 

0.00 

156.00 

71.000000 

78.000000 

B-52CMC 

40.00 

156.00 

91.000000 

58.000000 

PB111PBI 

0.00 

60.00 

30.000000 

30.000000 

BIB 

30.00 

100.00 

65.000000 

35.000000 

ATB 

0.00 

124.00 

62.000000 

62.000000 

186 


The  RG8S8I0M.IM  file  Is  created  by  the  IMPTDATA  subroutine  to  be 
used  later  as  Input  to  the  RGRS8I0M  subroutine.  The  first  line  gives 
the  nuaber  of  design  variables  that  Is  processed  through  the  MPTDATA 
subroutine.  The  regaining  lines  list  the  nanes  of  the  design  variables 


12 

MKII 

min 

PKBSP 

MICBM 

POSC  3 

P08TRIC4 

TRID5 

B-S2PBM 

B-52CMC 

PBinpm 

BIB 


».»  « 


■  |V\ 


L'fc i!1 AL 
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225.00 

550.00 

100.00 

100.00 

240.00 

304.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

550.00 

100.00 

100.00 

240.00 

304.00 

160.00 

0.00 

0.00 

90.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

550.00 

100.00 

100.00 

240.00 

240.00 

160.00 

0.00 

0.00 

98.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

550.00 

100.00 

100.00 

240.00 

240.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

550.00 

0.00 

100.00 

240.00 

240.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

550.00 

0.00 

100.00 

240.00 

384.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

100.00 

0.00 

100.00 

240.00 

304.00 

160.00 

156.00 

156.00 

98.00 

30.00 

30.00 

55.00 

65.00 

65.00 

62.00 

225.00 

100.00 

100.00 

100.00 

240.00 

304.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

100.00 

100.00 

100.00 

240.00 

384.00 

160.00 

0.00 

0.00 

90.00 

30.00 

30.00 

6S.00 

65.00 

65.00 

62.00 

225.00 

100.00 

100.00 

100.00 

240.00 

240.00 

168.00 

0.00 

0.00 

98.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

100.00 

100.00 

100.00 

240.00 

240.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

100.00 

0.00 

100.00 

240.00 

240.00 

160.00 

156.00 

156.00 

90.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

100.00 

0.00 

100.00 

240.00 

240.00 

160.00 

0.00 

0.00 

90.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

100.00 

0.00 

100.00 

240.00 

304.00 

160.00 

0.00 

0.00 

90.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

550.00 

0.00 

100.00 

240.00 

304.00 

160.00 

0.00 

0.00 

98.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

550.00 

0.00 

100.00 

240.00 

240.00 

168.00 

0.00 

0.00 

90.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

100.00 

200.00 

240.00 

312.00 

336.00 

78.00 

70.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

100.00 

200.00 

240.00 

312.00 

336.00 

70.00 

70.00 

40.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

100.00 

200.00 

240.00 

312.00 

0.00 

70.00 

70.00 

40.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

100.00 

200.90 

240.00 

312.00 

0.00 

70.00 

78.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

100.00 

0.00 

240.00 

312.00 

0.00 

78.00 

78.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

100.00 

0.00 

240.00 

312.00 

336.00 

70.00 

70.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

0.00 

0.00 

240.00 

312.00 

336.00 

70.00 

70.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

0.00 

200.00 

240.00 

312.00 

336.00 

70.00 

78.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

0.00 

200.00 

240.00 

312.00 

336.00 

70.00 

70.00 

40.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

0.00 

200.00 

240.00 

312.00 

0.00 

70.00 

70.00 

40.00 

30.00 

30.00 

65.00 

65.00 

65.00 

62.00 

225.00 

325.00 

0.00 

200.00 

240.00 

312.00 

0.00 

70.00 

70.00 

156.00 

I 

I 

I 

I 


i 

i 


i 

I 

i 


1 

t 

{ 
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D 

( 

• 

0.00 

0.00 

05.00 

65.00 

65.00 

0.00 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

156.00 

156.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

156.00 

156.00 

98.00 

\ 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

0.00 

0.00 

98.00 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

) 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

0.00 

0.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

h 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

0.00 

0.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

156.00 

156.00 

98.00 

t 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

>* 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

156.00 

156.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

156.00 

156.00 

98.00 

'1 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

$ 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

156.00 

156.00 

98.00 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

*1 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

0.00 

0.00 

98.00 

1 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

336.00 

0.00 

0.00 

98.00 

! 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

0.00 

0.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

62.00 

•• 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

0.00 

0.00 

98.00 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

0.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

156.00 

156.00 

98.00 

S 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

s 

5 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

156.00 

156.00 

98.00 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

s 

.* 

450.00 

325.00 

50.00 

100.00 

240.00 

312.00 

0.00 

0.00 

0.00 

98.00 

30.00 

30.00 

30.00 

30.00 

30.00 

62.00 

225.00 

550.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

156.00 

j 

30.00 

30.00 

65.00 

65.00 

65.00 

124.00 

225.00 

550.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

156.00 

5 

30.00 

30.00 

65.00 

65.00 

65.00 

0.00 

225.00 

550.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

40.00 

30.00 

30.00 

65.00 

65.00 

65.00 

0.00 

225.00 

550.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

40.00 

« 

•* 

30.00 

30.00 

65.00 

65.00 

65.00 

124.00 

•« 

i. 

225.00 

550.00 

50.00 

100.00 

240.00 

312.00 

168.00 

0.00 

0.00 

40.00 

* 

•« 

30.00 

30.00 

65.00 

65.00 

65.00 

124.00 

•i 

225.00 

550.00 

50.00 

100.00 

240.00 

312.00 

168.00 

0.00 

0.00 

156.00 

•i 

30.00 

30.00 

65.00 

65.00 

65.00 

124.00 

225.00 

100.00 

50.00 

100.00 

240.00 

312.00 

168.00 

0.00 

0.00 

156.00 

\ 

30.00 

30.00 

65.00 

65.00 

65.00 

124.00 

225.00 

100.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

124.00 

225.00 

100.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

156.00 

30.00 

30.00 

65.00 

65.00 

65.00 

0.00 

225.00 

100.00 

50.00 

100.00 

240.00 

312.00 

168.00 

156.00 

156.00 

40.00 

30.00 

30.00 

65.00 

65.00 

65.00 

0.00 

192 

0.00 

0.00 

100.00 

100.00 

100.00 

€2.00 

j  225.00 

550.00 

50.00 

0.00 

240.00 

312.00 

1€8.00 

78.00 

78.00 

98.00 

€0.00 

€0.00 

100.00 

100.00 

100.00 

€2.00 

I  225.00 

100.00 

50.00 

0.00 

240.00 

312.00 

1€8.00 

78.00 

78.00 

98.00 

p  €0.00 

€0.00 

100.00 

100.00 

100.00 

€2.00 

L  225.00 

100.00 

50.00 

200.00 

240.00 

312.00 

168.00 

78.00 

76.00 

96.00 

r  €0.00 

€0.00 

100.00 

100.00 

100.00 

€2.00 

f  225.00 

100.00 

50.00 

200.00 

240.00 

312.00 

168.00 

78.00 

78.00 

98.00 

t  €0.00 

€0.00 

30.00 

30.00 

30.00 

€2.00 

I  225.00 

100.00 

50.00 

200.00 

240.00 

312.00 

168.00 

78.00 

78.00 

98.00 

l  0.00 

0.00 

30.00 

30.00 

30.00 

€2.00 

f  225.00 

100.00 

50.00 

200.00 

240.00 

312.00 

168.00 

76.00 

78.00 

98.00 

j?  0.00 

0.00 

100.00 

100.00 

100.00 

€2.00 

r  225.00 

100.00 

50.00 

0.00 

240.00 

312.00 

188.00 

78.00 

78.00 

98.00 

1  0.00 

0.00 

100.00 

100.00 

100.00 

€2.00 

1  225.00 

100.00 

50.00 

0.00 

240.00 

312.00 

166.00 

76.00 

78.00 

98.00 

\  0.00 

0.00 

30.00 

30.00 

30.00 

€2.00 

{  225.00 

100.00 

50.00 

0.00 

240.00 

312.00 

168.00 

78.00 

78.00 

98.00 

€0.00 

€0.00 

30.00 

30.00 

30.00 

€2.00 

V  225.00 

550.00 

50.00 

0.00 

240.00 

312.00 

168.00 

78.00 

78.00 

98.00 

l  €0.00 

€0.00 

30.00 

30.00 

30.00 

€2.00 

1  225.00 

550.00 

50.00 

0.00 

240.00 

312.00 

168.00 

78.00 

78.00 

98.00 

5  0.00 

0.00 

30.00 

30.00 

30.00 

€2.00 

;•  225.00 

325.00 

100.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

124.00 

;  225.00 

325.00 

100.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

h  30.00 

30.00 

100.00 

100.00 

100.00 

0.00 

1  225.00 

325.00 

100.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

>  30.00 

30.00 

30.00 

30.00 

30.00 

0.00 

j  225.00 

325.00 

100.00 

100.00 

304.00 

312.00 

166.00 

78.00 

78.00 

98.00 

>  30.00 

30.00 

30.00 

30.00 

30.00 

124.00 

J  225.00 

325.00 

100.00 

100.00 

17€.00 

312.00 

168.00 

78.00 

78.00 

98.00 

l  30.00 

30.00 

30.00 

30.00 

30.00 

124.00 

1  225.00 

325.00 

100.00 

100.00 

176.00 

312.00 

168.00 

78.00 

76.00 

98.00 

<  30.00 

30.00 

100.00 

100.00 

100.00 

124.00 

£  225.00 

325.00 

0.00 

100.00 

17€.00 

312.00 

168.00 

78.00 

78.00 

98.00 

r  30.00 

30.00 

100.00 

100.00 

100.00 

124.00 

•C  225.00 

325.00 

0.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

*  30.00 

30.00 

100.00 

100.00 

100.00 

124.00 

1  225.00 

325.00 

0.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

30.00 

30.00 

100.00 

100.00 

100.00 

0.00 

t  225.00 

325.00 

0.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

:  30.00 

30.00 

30.00 

30.00 

30.00 

0.00 

P  225.00 

325.00 

0.00 

100.00 

304.00 

312.00 

168.00 

78.00 

78.00 

98.00 

b  30.00 

30.00 

30.00 

30.00 

30.00 

124.00 

1  225.00 

325.00 

0.00 

100.00 

17€.00 

312.00 

168.00 

78.00 

78.00 

98.00 

■  30.00 

30.00 

30.00 

30.00 

30.00 

124.00 

&•  225.00 

325.00 

0.00 

100.00 

17€.00 

312.00 

166.00 

78.00 

78.00 

96.00 

30.00 

30.00 

30.00 

30.00 

30.00 

0.00 

g  225.00 

325.00 

0.00 

100.00 

17€.00 

312.00 

168.00 

78.00 

78.00 

98.00 

5  30.00 

30.00 

100.00 

100.00 

100.00 

0.00 

1  225.00 

325.00 

100.00 

100.00 

17€.00 

312.00 

168.00 

78.00 

78.00 

98.00 

^  30.00 

M 

30.00 

100.00 

100.00 

100.00 

0.00 

• 

i 

r 
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225.00 

325.00 

100.00 

100.00 

174.00 

312.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

30.00 

30.00 

30.00 

0.00 

450.00 

325.00 

50.00 

200.00 

240.00 

304.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

450.00 

325.00 

50.00 

200.00 

240.00 

304.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

450.00 

325.00 

50.00 

200.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

450.00 

325.00 

50.00 

200.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

450.00 

325.00 

50.00 

0.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

450.00 

325.00 

50.00 

0.00 

240.00 

304.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

0.00 

325.00 

50.00 

0.00 

240.00 

384.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

0.00 

325.00 

50.00 

200.00 

240.00 

384.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

0.00 

325.00 

50.00 

200.00 

240.00 

384.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

0.00 

325.00 

50.00 

200.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

0.00 

325.00 

50.00 

200.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

0.00 

325.00 

50.00 

0.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

124.00 

0.00 

325.00 

50.00 

0.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

0.00 

325.00 

50.00 

0.00 

240.00 

384.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

450.00 

325.00 

50.00 

0.00 

240.00 

384.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

450.00 

325.00 

50.00 

0.00 

240.00 

240.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

0.00 

225.00 

325.00 

50.00 

100.00 

240.00 

312.00 

148.00 

78.00 

78.00 

98.00 

30.00 

30.00 

45.00 

45.00 

45.00 

42.00 
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Bach  execution  of  the  IABM1.DAT  file  (Appendix  B)  produces  the  ABM 
output  file  —  OABMl.DAT.  It  Is  this  file  that  Tool  Two  (Appendix  D) 
extracts  the  dependent  variable  Information  from.  (Mote:  The  ABM 
outputs  the  OABHl.DAT  file  in  a  local  printer  format.  Therefore,  the 
file  Is  132  characters  wide.  Consequently,  copying  132  columns  Into  72 
columns,  for  this  appendix,  produces  some  difficulty  in  text  appearance 
and  text  reading.  Just  remember,  sometimes  two  lines  are  required  to 
represent  one  line  of  actual  OABMl.DAT  data.) 

The  OABMl.DAT  file  shown  here  In  this  appendix  Is  not  Indicative  of 
the  amount  of  print  the  ABM  will  generate.  Most  of  the  output  print  has 
been  shut  off  through  the  ABM  print  flags.  Only  the  print  used  in  the 
RSMed-ABM  program  test  Is  shown. 


I RUT  PI LB  18  IABMl  OUTPUT  PILB  MAMB  IS  OAB 

Ml 

ABM  HBDGB  AUGU8T  1985 

INPUT  DATA  *•*••«***»#••• 


(1-1) 


B8TIMATB8  OP  DATA  FOR  BOTH  8IDB8 

8AGOGO 

C 

C  Scenario  variables 
C 


TITLE-TACT  7.71  strategic  Force  Analysis  Projects, 

VBP(1)-18, 

BTARGT (1,1) =HHI I, (Mill, PKBBP , MI CBM , POSC3 , POSTKIC4 , TRIOS, B52GRV, B528RM, BS2CMC, 
BTARGT( 11,1) -FBU 1SRM, FBI 1 1GRV , B1BGRV, B1BSRM, B1BALCM, ATB, 

BTABGT( 1, 2 ) =CIV1L,L0CAL,C3I , APB ASK, I CBM  8ILO,LCC,MICBM,MUK8TOR,SUBPT8, 

BTARCT( 10 , 2 ) *88-20, STORBS, FACIL, DBPOS , NAVAL, FACTOR, POL , ENERGY, 

VCMAMEd ) -BLUB  WEAPONS , BICBM, BSLBM, BBOMBBR , BFA8T, BSLOW, 

BLUB_VRAPOMS»L-L6, 

BICBM* 1-4, 

B8LBM-S-7, 

BBOHBER-8-18, 

BF AST-1-7, 

BSLOV-8-18, 

TCMAHBd ) -RSD_TARGET8 , RLC3I , RNUC, RCOMV, RIND, RTIMB  URGENT, 

RBD_TARGBT8*1-17, 

RLC3I-1-3, 

RNUC* 4 -10, 

RCOMV=ll-14, 

RIND-15-17, 

RTIMB_URGBMT=3-6,9, 

IMPACT  FLAG-10, 

IMPACT( 1,1) -18*3, 

C 

C  Print  Variables 


C 

HBDGB  PRINT— 2,-3, 

INPUT  PRINT— 2, 

RB8ULT  PRINT— 1, -2, -3, -4, -5, -8, -7, -8, -9, -10, -11, -12, -13, -14, 

STRIKE  PRINT— 1, 

TARGET  PRINT— 1,-2, -3, 

WEAPON  PRINT— 1,-2, -3, -4, -5, -8, -7, -8, -9, -10, 

C 

C  Weapon  Variables  (Side  1) 

C 

BTARGT( 1, 1 ) -MMI I ,W(I I I , PKEEP,MICBM, POSC3, P08TRIC4, TRIPS, BS2GRV, BS2SRM, BS2CMC, 


JTYPB( 1,1)- 

1, 

1, 

1, 

1,  2, 

2, 

2, 

3, 

3, 

3, 

TNUMB(1,1)« 

77, 

110,  45 

,  io. 

190,  250, 

10 

,  5 

,  5,  42 

,  33, 

33, 

95,  95 

THUMB ( 15,1)- 

95, 

102, 

CEP(1,1)« 

•2, 

.135, 

.05, 

.07,  .24, 

24, 

.07, 

•«r 

•2, 

.054, 

YIELD(1,1)- 

1.2, 

34, 

•  34, 

.34,  .05, 

•1, 

34, 

1# 

.2, 

2, 

AV(1,1»« 

.98, 

.98, 

.98, 

•98^  • 8 i 

•  ®F 

•  8  p 

85, 

.85, 

.85, 

VHPC(1,1)> 

1, 

3, 

10, 

If  iOp 

6, 

Or 

4, 

4, 

12, 

PL8(1,1)- 

.8, 

•  «, 

.8, 

.8,  .9, 

.925, 

.95, 

9, 

•9, 

9, 

PTP(l,l)- 

1, 

1, 

1, 

1,  1, 

1, 

1, 

.6, 

.71, 

RL(1,1)« 

.85, 

•  9, 

.9, 

.85,  . 8 , 

.85, 

.8, 

•  0, 

.75, 

BTAROT (11,1) 

-FBI 1 1SRM , FBI 1 1GRV, 

B1BGRV,B1BSRM, 

B1BALCM,  ATB, 

JTTPE(11,1)- 

3, 

3, 

3, 

3, 

3,  3, 

CEP(ll,l)- 

2, 

•  2, 

.15, 

.10, 

.054,  .05, 

YIBLD(11,1)- 

.2, 

1, 

1, 

.2, 

•2,  .5, 

AV(11,1)- 

.85, 

.85, 

.85, 

.85, 

• 

85,  .85, 

VHPC(11,1)- 

4, 

2, 

4, 

4, 

0,  12, 

PL8(11,1)- 

.9, 

.9, 

.95, 

.95, 

• 

95,  .95, 

PTP(11,1)- 

.87, 

.87, 

.84, 

.84, 

• 

84,  .95, 

RL(11,1)-  .85,  .8,  .85,  .85,  .8,  .85, 

C 

C  Target  variables  (8ide  2) 

C 

BTARGT! 1,2) "CIVIL, LOCAL,  C3I,AFBASR,ICBM  SILO,  LCC,MICBM,NUKST0R,8UBPTS, 


TCAT( 1, 2 ) * 

3, 

3,  2, 

1, 

1,  2, 

1, 

2, 

2, 

TNUMB(1,2)> 

140, 

215,  450, 

70, 

640,  120, 

150, 

50, 

20, 

R9  5(1,2)* 

.28, 

.245,  0, 

.395, 

o,  o. 

o. 

o. 

.18, 

VAL(1,2)» 

1, 

1,  1, 

1, 

1, 

1, 

HARD( 1,2)* 

2400, 

13P1,35P7, 

10Q1, 

52P8, 39P0, 

30, 

39P5, 

22P1, 

CDM(1,2)« 

.8, 

■  8 1  •  8  f 

8, 

.8,  .8, 

.8, 

8, 

8, 

BTARGT( 10,2 ) 

*88-20, 

STORES, FACIL,DEPOS, 

NAVAL, FACTOR, 

POL, ENERGY, 

TCAT(10,2)« 

1, 

2, 

2,  2, 

2,  3, 

3, 

3, 

TMUMB(10,2)* 

400, 

430,  520,  550, 

130,  1100, 

1300, 

435, 

R95(10,2>- 

o. 

0,  .165,  .28, 

.2,  .245, 

o. 

.11, 

VAL(10,2)* 

1, 

1, 

1,  1, 

1,  1, 

1, 

HARD(10,2)* 

11P0, 

31P6,  23QO,  16Q0, 

18P0,  14Q0, 

10P0, 

18P0, 

CDM(10,2)* 

•  8, 

•7, 

.7,  .7, 

.7,  .6, 

.8, 

ALLOV(3,2)*l-7, 

ALLOV( 4, 2) *1-7, 

ALLOW! 5, 2) *1-7, 

ALLOW! 6, 2) *1-7, 

ALLOW! 7, 2) *13, 14, 16, 

ALLOW!), 2) *1-7, 

ALLOW! 10, 2) *13, 14, 16, 

C 

C  value  Accounts 
C 

ATASK!1,1)-LC3I  TRGTS,NUC  TROTS, COWV  TROTS, IID/KCOM  TRG, TOTAL  TROTS, 
ACCOUNT! 1,1) "VALUE  DBST  ON  (RLC3I )  BY  (ALL)  NU8T  BUI, 

ACCOUNT! 2,1) "VALUE  DB8T  ON  (RNUC)  BY  (ALL)  MUST  BE  LE  1, 

ACCOUNT! 3,1) "VALUE  BEST  ON  (RCONV)  BY  (ALL)  NU8T  BE  LE  1, 

ACCOUNT! 4,1) "VALUE  DBST  ON  (RIND)  BY  (ALL)  MUST  BE  LE  1, 

ACCOUNT! 5,1) "VALUE  DBST  ON  (ALL)  BY  (ALL)  MUST  BE  LB  1, 

C 

C  Weapon  Hedges 
C 

TASK (1,1) "TIME  URGENT, REST  OF  LC 3 I, REST  OF  NUC,CONV  DAMAGE, IND  DAMAGE, 
TA8K(6,1)-ALL  TARGETS, 

HEDGE ( 1,1) "TARGST8  OF  TYPE  (RTIME  URGENT)  BY  (BICBM,B8LBN)  MUST  BE  BQ  1, 
HEDGE! 2,1) "TARGETS  OF  TYPE  (1,2)  BY  (ALL)  MUST  BE  BQ  1, 

HEDGE! 3,1) "TARGETS  OF  TYPE  (7,8,10)  BY  (ALL)  MUST  BE  BQ  1, 

HEDGE! 4,1) -TARGETS  OF  TYPE  (RCONV)  BY  (ALL)  MUST  BE  BQ  1, 
HSDGB(5,1)«TARGET8  OF  TYPE  (RIND)  BY  (ALL)  MUST  BE  BQ  1, 

HE0QE( 6,1) -VALUE  DBST  ON  (ALL)  BY  (ALL)  MUST  BQ  1, 

PRIORITY!  1,1)— 1,-2, -3, -4, -5, -6, 

0 


LP  NUMBER  8TRAT8  TOTAL  STRAT8  PIVOTS  PAYOPP  BXIT  CRITERION 

1  21  128  27  -35185.83  0.000000 

2  28  146  44  -28314.33  -0.008136 

AH  MODIFYING  HEDGE  1  ORIGINAL  GOAL8  1288.35  ACHIEVED*  512.35 

NOV  WORKING  ON  PRIORITY  NUMBER  2 

MOV  WORKING  ON  PRIORITY  NUMBER  3 

MOV  WORKING  ON  PRIORITY  NUMBER  4 

NOV  WORKING  ON  PRIORITY  NUMBER  5 

3  28  146  2  -13117.34  -0.007148 

4  28  143  4  -12377.80  -0.006065 

AM  MODIFYING  HEDGE  5  ORIGIMAL  GOAL*  2833.58  ACHIEVED*  1871.35 

NOV  WORKING  ON  PRIORITY  NUMBER  6 

5  30  143  2  -17815.85  -0.001778 

6  30  143  2  -17815.74  0.000000 

AM  MODIFYING  HEDGE  6  ORIGIMAL  GOAL*  6716.64  ACHIEVED-  3880.83 

NOV  WORKING  ON  PRIORITY  NUMBER  0 

7  30  144  2  3881.50  -0.000877 

8  30  148  0  3880.83  0.000000 


TACT  7.71  Strategic  Force  Analysis  Projects 
IAEM1, 


( H— 1 )  HEDGE  CONDITION  DATA 


LEVEL  PERCENT 

CONDITION  ACHIEVED  ACHIEVED  LAMBDA  PREFERENCE  PRIORITY  TASK 

•  1  0.38  38.43  0.00  -8.00  -1  TIME  UR 

GENT  MOT  ACHIEVED 

MO.  OF  TGT8  OF  TYPE  (3-6,8)  ATTACKED  BY  VPNS  OF  TYPE  (1-7)  MU8T  BE  EQ  1, 

•  2  1.00  100.00  0.00  -8.00  -2  RE8T  OF 

LC3I 

NO.  OF  TOTS  OF  TYPE  (1-2)  ATTACKED  BY  VPNS  OF  TYPE  (ALL  )  MUST  BE  BO  1, 

•  3  1.00  100.00  0.00  -8.00  -3  REST  OF 

NUC 

NO.  OF  TGT8  OF  TYPE  (7-8,10)  ATTACKED  BY  VPNS  OF  TYPE  (ALL  )  MUST  BE  EQ  1, 

•  4  1.00  100.00  0.00  -8.00  -4  COMV  DA 


MO.  or  TOTS 

*  5 
AOS 

MO.  OF  TOTS 

•  6 

GETS 

VALUE  DEBT. 


OF  TYPI  (11-14)  ATTACKED  BY  VPNS  OF  TYPE  (ALL 

0.70  60.57  0.00  -8.00 

***  MOT  ACHIEVED 

OP  TYPE  (15-17)  ATTACKED  BY  VPNS  OP  TYPE  (ALL 

0.59  59.27  1.00  -8.00 

***  MOT  ACHIEVED 

OM  TOTS  (1-17)  BY  MPM8  OP  TYPE  (  ALL  )  MUST 


)  MUST  BE  BQ  1, 
-5  IMD  DAM 
)  MUST  BE  BQ  1, 
-6  ALL  TAR 
BE  BQ  1 


(H-5) 


SUPPLEMENTARY  ACCOUNTING  STATISTICS 


LEVEL  PERCENT 


IOM  ACHIEVED 
VALUE  DEST. 
1  0.86 

VALUE  DEST. 

2  0.43 
VALUE  DEST. 

3  0.75 


VALUE  DEST. 

4  0.51 
VALUE  DEST. 

5  0.59 

t 

* 

I 


ACHIEVED  TASK 

OM  TOTS  (1-3)  BY  VPMS  OP  TYPE  (  ALL 
85.86  LC3I  TRGTS 

ON  TGT8  (4-10)  BY  VPM8  OP  TYPE  (  ALL 
43.45  NUC  TROTS 

ON  TCT8  (11-14)  BY  MPNS  OP  TYPE  (  ALL 
75.04  COMV  TROTS 

OM  TGTS  (15-17)  BY  VPMS  OP  TYPE  (  ALL 
50.67  IMD/ECOM  TRO 

OM  TOTS  (1-17)  BY  VPNS  OP  TYPE  (  ALL 
59.24  TOTAL  TROTS 


)  MUST  BE  LE  1 
)  MUST  BE  LB  1 
)  MUST  BE  LB  1 
)  MUST  BE  LB  1 
)  MUST  BE  LB  1 


CONDI T 


i 

\ 


BASE  PILE  *  IAEM1 


OUTPUT  PILE  «  OAEM1 


FINISHED  -  CONDITION  CODE  »  0 


itL  nt  UBMgjMg  njft 

The  8TORA0B.DAT  file  le  created  and  'stored*  with  data  by  the  Tool 
Two  progran  (Appendix  D).  The  file  is  'stored*  two  lines  at  a  tins  (one 
ABt  execution)  where  the  first  line  lists  the  values  for  the  Am  vari¬ 
ables  (weapons  in  this  case)  and  the  second  line  gives  the  values 
generated  by  the  Am  for  the  dependent  variables. 


4S9  550  50 
94.(9  99.(0 

100  304  312 
81.(9  88/  1 

33(  78 
85.75 

78 

99 

30 

30 

(5 

(5 

(5 

(2 

450  550  50 

99. 9(  (1.21 

100  304  312 
7(.1(  75.93 

0  78 
74. 3( 

78 

98 

30 

30 

(5 

(5 

(5 

(2 

450  550  50 
99.77  (1.21 

100  17(  312 
74.(5  (3.(7 

0  78 
(8.57 

78 

98 

30 

30 

(5 

(5 

(5 

(2 

450  550  50 
95.37  99.(9 
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The  RBSPNSBS.IM  file  is  manually  created  f roa  the  STORAGB.DAT  file 
shown  in  Appendix  L.  Starting  with  line  one  of  the  STORAGB.DAT  file, 
every  other  line  is  deleted  through  the  whole  file.  What  renal ns  are 
the  lines  containing  the  dependent  variable  values  fro*  each  of  the  193 
ABM  executions,  i.e.  the  RBSPNSBS.IN  file. 
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Appendix  Ml  tt*  DBQMHTBX.li  rile 

The  OSGNMTRX. IN  file  Is  created  froa  the  CODBDSGN  subroutine  when 
selection  C  is  picked  froa  the  aaln  aeno  of  the  RSMed-ABM  prograa.  The 
D8GNMTRX. IN  file  is  the  coded  version  (refer  to  equation  2.3)  of  the 
ABM. DAT  file  (Appendix  J)  vlth  the  exception  of  the  first  line.  The 
first  line  first  shows  how  aany  design  variables  were  processed  In  the 
INPTDATA  subroutine  and  then  how  aany  ABM  variables  there  are  In  the 
IAEMl.DAT  file  (Appendix  B).  The  expanded  Box-Behnken  experimental 
design  follows. 
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The  RBGRBSS.DAT  file  Is  created  by  the  RGBSSIOM  subroutine.  The 
file  contains  the  88 S,  SSR,  88 TO,  Ra,  and  residual  statistics  along  with 
the  parameter  sua-of -squares.  The  paraaeter  sua-of -squares  are  shown  in 
ascending  order  by  the  paraaeter  sua-of-squares  as  an  aid  to  the  user 
when  choosing  variables  to  include  in  the  aodel  that  will  be  used  for 
inforaational  analysis.  This  appendix  show  the  regression  results  for 
five  dependent  variables. 


Regression  Output  for  Dependent  Variable:  Yl 


Model  Sub  of  Rrror  Sua  of  Total  Sub  of 

Squares  (SSR)  Squares  (SSB)  Squares  (SSTO)  R-Square 

452.22  197.90  650.12  0.6956 


Paraaeters  Of  Yl  Sorted  In  Ascending  Order 


By  Their 

Sub  Of  Squares 

Type  I  8ua 

Percent 

Suaaed  Percent 

Nuaber 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

1 

PKBBP 

• 

B-52CMC 

0.001 

0.00 

0.00 

2 

MICBM 

• 

B-52CMC 

0.002 

0.00 

0.00 

3 

mu 

• 

B-52CMC 

0.002 

0.00 

0.00 

4 

PB111PBM 

• 

ATB 

0.003 

0.00 

0.00 

5 

MMIII 

• 

B-52PBM 

0.004 

0.00 

0.00 

6 

NMII 

• 

PB111PBM 

0.004 

0.00 

0.00 

7 

MICBM 

• 

PBlllPBM 

0.004 

0.00 

0.00 

8 

MICBM 

• 

ATB 

0.007 

0.00 

0.01 

9 

BIB 

* 

ATB 

0.020 

0.00 

0.01 

10 

POSC3 

• 

BIB 

0.021 

0.00 

0.02 

11 

POSTRIC4 

t 

POSTRIC4 

0.026 

0.01 

0.02 

12 

TRID5 

• 

ATB 

0.026 

0.01 

0.03 

13 

PKBBP 

* 

BIB 

0.026 

0.01 

0.03 

14 

mu 

• 

POSTRIC4 

0.040 

0.01 

0.04 

15 

B-52PBM 

• 

PB111PBM 

0.046 

0.01 

0.05 

Parameters  of  Yl  Sorted  In  Ascending  order 
By  Their  Sum  Of  Squares 


Type  I  Sum 

Percent 

Summed  Percent 

Number 

Variable 

of  Squares 

Of  SSS 

Of  SSR 

16 

MMII 

•  mu 

0.047 

0.01 

0.06 

17 

HICBM 

•  MICBM 

0.055 

0.01 

0.07 

18 

ATB 

•  ATB 

0.061 

0.01 

0.08 

IS 

MMII 

•  BIB 

0.064 

0.01 

0.10 

20 

HICBM 

*  B-52PBN 

0.068 

0.01 

0.12 

21 

MMIII 

*  PBlllPBM 

0.068 

0.01 

0.13 

22 

FB111PBM 

0.073 

0.02 

0.15 

23 

PKBBP 

•  POSC3 

0.082 

0.02 

0.17 

24 

POSC3 

*  POSC 3 

0.082 

0.02 

0.18 

25 

PB111PBM 

*  BIB 

0.083 

0.02 

0.21 

26 

TRID5 

•  BIB 

0.085 

0.02 

0.23 

27 

B-52CHC 

*  BIB 

0.101 

0.02 

0.25 

28 

HICBM 

•  BIB 

0.106 

0.02 

0.28 

28 

MMII 

•  B-52PEM 

0.111 

0.02 

0.30 

30 

POSC3 

•  PBlllPBM 

0.112 

0.02 

0.32 

31 

HICBM 

*  P08C3 

0.130 

0.03 

0.35 

32 

TRID5 

•  PBlllPBM 

0.138 

0.03 

0.38 

33 

B-52CMC 

•  PBlllPBM 

0.138 

0.03 

0.41 

34 

BIB 

•  BIB 

0.150 

0.03 

0.45 

35 

PB111PBM 

•  PBlllPBM 

0.186 

0.04 

0.48 

36 

MI  CBM 

*  P08TRIC4 

0.207 

0.05 

0.54 

37 

POSC3 

•  POSTS I C4 

0.214 

0.05 

0.58 

38 

MMIII 

•  POSC3 

0.216 

0.05 

0.63 

38 

ATB 

0.248 

0.05 

0.68 

40 

B-52PBN 

*  B-52CMC 

0.282 

0.06 

0.75 

41 

MMII 

•  POSC 3 

0.303 

0.07 

0.82 

42 

PKBBP 

•  PBlllPBM 

0.334 

0.07 

0.88 

43 

TRID5 

*  B-52CMC 

0.342 

0.08 

0.87 

44 

PKBBP 

•  B-52PBN 

0.432 

0.10 

1.06 

45 

B-52PBM 

*  ATB 

0.448 

0.10 

1.16 

46 

mu 

•  TBID5 

0.543 

0.12 

1.28 

47 

POSC  3 

•  B-52CMC 

0.544 

0.12 

1.40 

48 

POSTSIC4 

•  B-52CMC 

0.551 

0.12 

1.52 

48 

mu 

*  PKBBP 

0.574 

0.13 

1.65 

50 

mu 

•  ATB 

0.656 

0.15 

1.80 

51 

POSTS IC4 

•  PBlllPBM 

0.685 

0.15 

1.85 

52 

POSC  3 

*  TRID5 

0.706 

0.16 

2.10 

53 

mm 

•  BIB 

0.722 

0.16 

2.26 

54 

POSTRIC4 

•  B-52PBM 

0.833 

0.18 

2.45 

55 

POSTS IC 4 

*  TRID5 

0.842 

0.18 

2.63 

56 

mm 

*  B-52CMC 

0.865 

0.18 

2.83 

57 

PKBBP 

*  ATB 

0.826 

0.20 

3.03 

58 

POSC  3 

*  ATB 

1.035 

0.23 

3.26 

58 

B-52CMC 

•  B-52CMC 

1.040 

0.23 

3.48 

60 

mu 

•  MICBM 

1.040 

0.23 

3.72 

61 

TRID5 

•  B-52PBM 

1.087 

0.24 

3.86 

Parameters  of  ¥1  Sorted  In  Ascending  order 

By  Their  Sum  Of  Squares 


Type  I  Sum 

Percent 

Summed  Percent 

Humber 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

62 

POSTRIC4 

• 

BIB 

1.283 

0.28 

4.25 

63 

PKBBP 

• 

P0STRIC4 

1.305 

0.29 

4.53 

64 

POSTRIC4 

• 

ATB 

1.441 

0.32 

4.85 

65 

MM  1 1 1 

• 

ATB 

1.538 

0.34 

5.19 

66 

B-52CMC 

1.802 

0.40 

5.59 

67 

MM  1 1 1 

• 

POSTRIC4 

1.911 

0.42 

6.01 

68 

B-52PBN 

t 

BIB 

2.318 

0.51 

6.53 

69 

MM  1 1 1 

* 

mm 

2.679 

0.59 

7.12 

70 

min 

* 

MICBM 

2.756 

0.61 

7.73 

71 

B-52CMC 

• 

ATB 

2.822 

0.62 

8.35 

72 

B-52PSM 

* 

B-52PBM 

4.674 

1.03 

9.39 

73 

mm 

• 

TRID5 

5.176 

1.14 

10.53 

74 

POSC3 

• 

B-52PBN 

6.350 

1.40 

11.93 

75 

TRIDS 

t 

TRID5 

6.466 

1.43 

13.36 

76 

mu 

6.734 

1.49 

14.85 

77 

MICBM 

7.426 

1.64 

16.50 

78 

POSTRIC4 

8.345 

1.85 

18.34 

79 

mu 

t 

mm 

8.381 

1.85 

20.19 

80 

mm 

• 

PKBBP 

8.570 

1.90 

22.09 

81 

POSC  3 

9.579 

2.12 

24.21 

82 

BIB 

10.898 

2.41 

26.62 

83 

MICBM 

* 

TRI05 

11.937 

2.64 

29.26 

84 

PKBBP 

* 

TRID5 

13.286 

2.94 

32.20 

85 

PKBBP 

• 

MICBM 

13.913 

3.08 

35.27 

86 

B-52PBN 

18.922 

4.18 

39.46 

87 

mm 

30.650 

6.78 

46.23 

88 

PKBBP 

t 

PKBBP 

34.983 

7.74 

53.97 

89 

PKBBP 

67.261 

14.87 

68.84 

90 

TRID5 

140.897 

31.16 

100.00 

Pot  Yl:  Residuals  Associated  With  The  Design  Points 


Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

1 

84.66 

83.87 

0.79 

2 

88.86 

88.66 

0.20 

3 

86.77 

87.51 

-0.74 

4 

85.37 

83.56 

I  ,81 

5 

84.96 

85.00 

-0.04 

6 

84.06 

84.84 

-0.78 

7 

84.66 

83.28 

1.38 

8 

83.77 

85.21 

-1.44 

220 


Foe  Yl:  Residuals  Associated  with  The  Design  Points 


Design  Point  ABM's  Response  Postulated  Model's  Response 


Residual 


For  Yl:  Residuals  Associated  With  The  Design  Points 


Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

57 

88.11 

87.58 

0.53 

58 

88.41 

87.17 

1.24 

59 

88.41 

87.54 

0.87 

60 

88.41 

88.04 

0.37 

61 

88.41 

88.01 

0.40 

62 

86.11 

85.90 

0.21 

63 

84.31 

84.93 

-0.62 

64 

86.68 

87.30 

-0.62 

65 

86.45 

88.28 

-1.83 

66 

87.21 

87.00 

0.21 

67 

85.64 

85.76 

-0.12 

68 

87.60 

87.37 

0.23 

69 

86.45 

86.68 

-0.23 

70 

87.41 

86.85 

0.56 

71 

85.00 

85.43 

-0.43 

72 

87.41 

87.32 

0.09 

73 

85.70 

86.14 

-0.44 

74 

85.64 

85.64 

0.00 

75 

86.45 

87.14 

-0.69 

76 

86.45 

85.99 

0.46 

77 

86.79 

85.63 

1.16 

78 

85.70 

85.38 

0.32 

79 

86.84 

86.70 

0.14 

80 

86.79 

86.21 

0.58 

81 

84.96 

85.07 

-0.11 

82 

84.07 

84.46 

-0.39 

83 

83.83 

84.14 

-0.31 

84 

84.07 

84.80 

-0.73 

85 

89.10 

87.96 

1.14 

86 

89.07 

88.60 

0.47 

87 

86.68 

86.58 

0.10 

88 

82.80 

83.97 

-1.17 

89 

83.77 

84.21 

-0.44 

90 

84.46 

84.72 

-0.26 

91 

83.82 

84.53 

-0.71 

92 

86.46 

86.77 

-0.31 

93 

87.93 

87.12 

0.81 

94 

87.93 

86.99 

0.94 

95 

88.65 

88.16 

0.49 

96 

87.93 

87.46 

0.47 

97 

84.73 

85.40 

-0.67 

98 

82.77 

83.84 

-1.07 

99 

84.66 

85.33 

-0.67 

100 

84.96 

85.37 

-0.41 

101 

88.84 

89.27 

-0.43 

102 

88.61 

88.26 

0.35 

103 

88.72 

87.39 

1.33 

104 

84.73 

85.05 

-0.32 

4 


il.'il.'lL'it.UI  ■<<*•■  **■  <|i  j 


*•1  4iL*»l 


Foe  TL:  Residuals  Associated  with  The  Design  Points 


1  Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

8  105 

83.77 

83.74 

0.03 

ffl  106 

83.89 

84.90 

-1.01 

K  107 

84.79 

84.69 

0.10 

ft  108 

89.55 

88.07 

1.48 

■  109 

89.31 

87.98 

1.33 

y  no 

86.59 

85.77 

0.82 

K  ill 

85.88 

86.39 

-0.51 

y  112 

88.59 

88.93 

-0.34 

i  in 

85.12 

86.06 

-0.94 

K  114 

87.60 

87.06 

0.54 

1  115 

85.85 

86.08 

-0.23 

"  116 

87.42 

66.76 

0.66 

117 

87.42 

87.76 

-0.34 

rV  118 

87.41 

86.52 

0.69 

K  119 

86.18 

86.24 

-0.06 

£  120 

86.18 

85.74 

0.44 

I  121 

85.51 

85.50 

0.01 

?  122 

82.99 

83.59 

-0.60 

123 

86.25 

85.51 

0.74 

v  124 

86.34 

86.55 

-0.21 

K  125 

85.95 

85.30 

0.65 

k  126 

86.34 

86.67 

-0.33 

|  127 

87.12 

88.19 

-1.07 

5  128 

87.60 

87.75 

-0.15 

9  129 

85.07 

84.94 

0.13 

9  130 

84.66 

84.74 

-0.08 

13! 

83.77 

84.23 

-0.46 

£  132 

84.55 

84.81 

-0.26 

■  133 

86.88 

86.96 

-0.08 

"  134 

87.53 

87.07 

0.46 

"■  135 

86.59 

86.04 

0.55 

E;:  136 

84.66 

84.67 

-0.01 

137 

84.66 

84.53 

0.13 

;  138 

83.46 

83.97 

-0.51 

■  139 

84.33 

84.48 

-0.15 

ft  140 

85.87 

85.88 

-0.01 

£  141 

85.87 

85.94 

-0.07 

S  i« 

86.68 

86.48 

0.20 

ft  143 

87.69 

87.45 

0.24 

ft  144 

86.88 

86.96 

-0.08 

V  145 

86.50 

86.31 

0.19 

■  1« 

85.98 

85.38 

0.60 

147 

84.93 

85.05 

-0.12 

£  148 

86. 59 

86.29 

0.30 

>  149 

88.53 

87.94 

0.59 

ft  150 

88.53 

88.01 

0.52 

1  151 

85.03 

85.24 

-0.21 

£•  152 

85.21 

85.20 

0.01 

W 
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Regression  Output  tor  Dependent  Variable:  Y2 


Model  Sub  of 

Error  Sub  of 

Total  Sub  of 

Squares  (SSR) 

Squares  (SSR) 

Squares  (SSTO) 

R-Square 

39535.10 

181.91 

39717.00 

0.9954 

Paraaeters  Of  Y2  Sorted  In  Ascending  Order 

By  Their 

Sub  Of  Squares 

Type  I  Sub 

Percent 

SuMKd  Percent 

Muaber 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

1 

HI  CBM 

t 

P08C3 

0.000 

0.00 

0.00 

2 

MICBM 

* 

POSTRIC4 

0.000 

0.00 

0.00 

3 

MICBM 

• 

B-52PBN 

0.000 

0.00 

0.00 

4 

POSC  3 

* 

B-52PRN 

0.000 

0.00 

0.00 

5 

POSC3 

t 

PB111PBM 

0.000 

0.00 

0.00 

6 

B-52PBM 

t 

PB111P8N 

0.000 

0.00 

0.00 

7 

MM  1 1 

• 

POSTRIC4 

0.000 

0.00 

0.00 

8 

B-52PBM 

* 

ATB 

0.000 

0.00 

0.00 

9 

PKBBP 

t 

B-52CMC 

0.000 

0.00 

0.00 

10 

POSTRIC4 

• 

PBlllPBM 

0.000 

0.00 

0.00 

11 

FBlllPEN 

* 

BIB 

0.000 

0.00 

0.00 

12 

TRID5 

t 

ATB 

0.000 

0.00 

0.00 

13 

P08TRIC4 

• 

B-52PBM 

0.000 

0.00 

0.00 

14 

MMIII 

• 

ATB 

0.000 

0.00 

0.00 

15 

B-52CMC 

• 

ATB 

0.000 

0.00 

0.00 

16 

HHIII 

* 

B-52CMC 

0.000 

0.00 

0.00 

17 

PB111PRM 

0.000 

0.00 

0.00 

18 

MMII 

• 

PBlllPBM 

0.000 

0.00 

0.00 

19 

HMII 

• 

B-52CMC 

0.000 

0.00 

0.00 

20 

B-52PBM 

* 

BIB 

0.000 

0.00 

0.00 

21 

MMII 

• 

POSC  3 

0.000 

0.00 

0.00 

22 

P08TRIC4 

• 

TRID5 

0.000 

0.00 

0.00 

23 

B-52PBM 

0.000 

0.00 

0.00 

24 

MICBM 

• 

PBlllPBM 

0.000 

0.00 

0.00 

25 

MMII 

t 

ATB 

0.000 

0.00 

0.00 

26 

PKBRP 

* 

B-52PBN 

0.000 

0.00 

0.00 

27 

MICBM 

» 

ATB 

0.000 

0.00 

0.00 

28 

MICBM 

* 

BIB 

0.000 

0.00 

0.00 

29 

MICBM 

t 

B-52CHC 

0.000 

0.00 

0.00 

30 

TRID5 

• 

B-52CMC 

0.000 

0.00 

0.00 

31 

FB111PBM 

• 

ATB 

0.000 

0.00 

0.00 

32 

MMIII 

• 

PBlllPBM 

0.000 

0.00 

0.00 

33 

TRID5 

• 

B-52PBM 

0.000 

0.00 

0.00 

34 

POSC  3 

• 

TRID5 

0.000 

0.00 

0.00 

35 

TRID5 

• 

PBlllPBM 

0.000 

0.00 

0.00 

36 

TRID5 

• 

BIB 

0.000 

0.00 

0.00 

Parameters  Of  Y2  Sorted  In  Ascending  Order 
By  Their  Sam  Of  Squares 


Type  I  Sum 

Percent 

Summed  Percent 

Number 

Variable 

of  Squares 

Of  38R 

Of  S8R 

37 

PKBBP 

*  POSTS I C4 

0.000 

0.00 

0.00 

3$ 

POSTRIC4 

•  B-52CHC 

0.000 

0.00 

0.00 

39 

B-52PBN 

*  B-52CMC 

0.000 

0.00 

0.00 

40 

Mill 

*  BIB 

0.001 

0.00 

0.00 

41 

mm 

*  BIB 

0.001 

0.00 

0.00 

42 

B-52CMC 

•  PB1UPBN 

0.001 

0.00 

0.00 

43 

mu 

•  B-52PBM 

0.001 

0.00 

0.00 

44 

POSTS IC4 

•  BIB 

0.001 

0.00 

0.00 

45 

POSC  3 

*  POSTRIC4 

0.001 

0.00 

0.00 

46 

PKBBP 

•  PB1UPBM 

0.001 

0.00 

0.00 

47 

POSTRIC4 

0.001 

0.00 

0.00 

48 

POSC  3 

•  B-52CHC 

0.001 

0.00 

0.00 

49 

B-52CHC 

•  BIB 

0.002 

0.00 

0.00 

50 

mm 

*  POSTRIC4 

0.002 

0.00 

0.00 

51 

mm 

•  B-52PBM 

0.002 

0.00 

0.00 

52 

POSTS I C4 

*  ATB 

0.002 

0.00 

0.00 

53 

mm 

•  P08C3 

0.007 

0.00 

0.00 

54 

POSC  3 

0.003 

0.00 

0.00 

55 

POSC3 

•  BIB 

0.003 

0.00 

0.00 

56 

B-52CHC 

0.005 

0.00 

0.00 

57 

POSC3 

*  ATB 

0.007 

0.00 

0.00 

58 

PKBBP 

*  POSC 3 

0.009 

0.00 

0.00 

59 

PRBBP 

•  ATB 

0.011 

0.00 

0.00 

60 

PKBBP 

•  BIB 

0.011 

0.00 

0.00 

61 

PKBBP 

*  HI CBM 

3.010 

0.01 

0.01 

62 

PKBBP 

•  PKBBP 

5.703 

0.01 

0.02 

63 

mu 

•  MICBM 

6.150 

0.02 

0.04 

64 

mu 

•  mm 

8.023 

0.02 

0.06 

65 

mu 

•  PKBBP 

14.765 

0.04 

0.10 

66 

MICBM 

•  TRID5 

21.856 

0.06 

0.15 

67 

HI  CBN 

23.900 

0.06 

0.21 

68 

mm 

•  MICBM 

33.034 

0.08 

0.29 

69 

mm 

•  mm 

47.537 

0.12 

0.41 

70 

mu 

•  TRID5 

57.566 

0.15 

0.56 

71 

mm 

•  PKBBP 

65.206 

0.16 

0.73 

72 

mu 

73.681 

0.19 

0.91 

73 

POSTSIC4 

*  POSTS I C4 

121.092 

0.31 

1.22 

74 

B-52PBM 

*  B-52PBM 

233.471 

0.59 

1.81 

75 

mm 

•  TRID5 

236.468 

0.60 

2.41 

76 

BIB 

•  ATB 

252.016 

0.64 

3.04 

77 

BIB 

*  BIB 

318.929 

0.81 

3.85 

78 

mu 

•  mu 

360.030 

0.91 

4.76 

79 

mm 

382.887 

0.97 

5.73 

80 

PB1UPBM 

•  PB1UPBM 

473.731 

1.20 

6.93 

81 

B-52CHC 

•  B-52CMC 

704.153 

1.78 

8.71 

82 

PKBBP 

*  TRIOS 

724.956 

1.83 

10.54 
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roc  Y2:  Residuals  Associated  With  The  Design  Points 


Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

31 

77.89 

78.94 

-1.05 

32 

77.89 

78.94 

-1.05 

33 

89.22 

89.80 

-0.58 

34 

89.22 

89.82 

-0.60 

35 

75.78 

73.73 

2.05 

36 

75.78 

73.73 

2.05 

3? 

69.83 

69.29 

0.54 

38 

89.68 

90.04 

-0.36 

39 

88.03 

90.07 

-2.04 

40 

87.57 

88.09 

-0.52 

41 

87.57 

88.11 

-0.54 

42 

45.44 

45.10 

0.34 

43 

45.44 

45.09 

0.35 

44 

42.99 

42.39 

0.60 

45 

42.99 

42.41 

0.58 

46 

88.03 

90.10 

-2.07 

47 

89.74 

90.07 

-0.33 

48 

69.83 

69.31 

0.52 

49 

88.53 

89.22 

-0.69 

50 

88.53 

89.21 

-0.68 

51 

88.53 

89.22 

-0.69 

52 

88.53 

89.22 

-0.69 

53 

88.53 

89.21 

-0.68 

54 

88.53 

89.21 

-0.68 

55 

88.67 

67.98 

0.69 

56 

88.67 

87.99 

0.66 

57 

88.67 

88.00 

0.67 

58 

88.67 

88.00 

0.67 

59 

88.67 

88.00 

0.67 

60 

88.67 

87.98 

0.69 

61 

88.67 

87.98 

0.69 

62 

88.  f7 

87.98 

0.69 

63 

88.53 

89.20 

-0.67 

64 

88.53 

89.20 

-0.67 

65 

89.14 

89.04 

0.10 

66 

81.41 

81.53 

-0.12 

67 

81.42 

81.51 

-0.09 

68 

89.17 

89.05 

0.12 

69 

89.17 

89.06 

0.11 

70 

89.14 

89.02 

0.12 

71 

89.05 

89.00 

0.05 

72 

89.14 

89.04 

0.10 

73 

81.40 

81.50 

-0.10 

74 

81.42 

81.50 

-0.08 

75 

89.18 

89.09 

0.09 

76 

89.17 

89.06 

0.11 

77 

81.42 

81.50 

-0.08 

78 

81.40 

81.48 

-0.08 
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For  Y2:  Residuals  Associated  with  The  Design  Points 


Design  Point 

AIM's  Response 

Postulated  Model's  Response 

Residual 

79 

91.41 

61.54 

-0.13 

90 

91.42 

91.53 

-0.11 

61 

99.46 

99.95 

-0.49 

92 

69.03 

69.52 

-0.49 

93 

67.97 

69.50 

-0.53 

94 

99.46 

99.94 

-0.49 

95 

59.59 

59.07 

0.52 

96 

59.56 

56.05 

0.51 

97 

59.56 

56.03 

0.53 

99 

99.41 

99.92 

-0.51 

99 

69.01 

69.53 

-0.52 

90 

69.01 

69.51 

-0.50 

91 

99.41 

99.92 

-0.51 

92 

59.54 

59.05 

0.49 

93 

37.13 

36.64 

0.49 

94 

37.13 

36.64 

0.49 

95 

37.13 

36.63 

0.50 

96 

37.13 

36.63 

0.50 

97 

99.01 

99.96 

0.15 

99 

91.29 

91.35 

-0.06 

99 

91.34 

91.37 

-0.03 

100 

99.06 

99.99 

0.17 

101 

61.62 

59.69 

1.93 

102 

61.61 

59.69 

1.93 

103 

53.62 

54.99 

-1.26 

104 

99.01 

99.42 

-0.41 

105 

91.24 

91.99 

-0.65 

106 

91.24 

91.99 

-0.64 

107 

99.01 

99.42 

-0.41 

109 

53.64 

54.96 

-1.22 

109 

45.97 

47.30 

-1.43 

110 

45.97 

47.33 

-1.46 

111 

53.95 

52.15 

1.70 

112 

53.95 

52.15 

1.70 

113 

99.59 

90.06 

-0.49 

114 

69.14 

69.64 

-0.50 

115 

69.14 

69.65 

-0.51 

116 

99.57 

90.06 

-0.49 

117 

99.59 

90.06 

-0.49 

119 

69.54 

90.03 

-0.49 

119 

95.66 

95.16 

0.50 

120 

95.66 

95.15 

0.51 

121 

64.21 

63.73 

0.49 

122 

64.24 

63.74 

0.50 

123 

95.66 

95.15 

0.51 

124 

95.69 

95.19 

0.50 

125 

64.24 

63.77 

0.47 

126 

64.24 

63.74 

0.50 
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For  Y2:  Residuals  Associated  with  The  Design  Points 


Design  Point 

ARM's  Response 

Postulated  Model's  Response 

Residual 

127 

68.10 

68.61 

-0.51 

128 

68.14 

68.65 

-0.51 

120 

89.40 

89.94 

-0.54 

130 

89.40 

89.94 

-0.54 

131 

89.40 

89.95 

-0.55 

132 

89.40 

89.97 

-0.57 

133 

77.89 

77.57 

0.32 

134 

77.85 

77.55 

0.30 

135 

74.02 

73.48 

0.54 

130 

89.40 

89.72 

-0.32 

137 

89.40 

89.71 

-0.31 

138 

89.41 

89.72 

-0.31 

139 

89.43 

89.75 

-0.32 

140 

74.06 

73.51 

0.55 

141 

74.06 

73.51 

0.55 

142 

74.06 

73.50 

0.56 

143 

77.89 

77.58 

0.31 

144 

77.90 

77.58 

0.32 

145 

88.91 

88.73 

0.18 

146 

81.18 

81.20 

-0.02 

147 

81.14 

81.18 

-0.04 

148 

88.91 

88.71 

0.20 

149 

89.37 

90.36 

-0.99 

150 

89.40 

90.37 

-0.97 

151 

82.63 

82.60 

0.03 

152 

87.93 

86.71 

1.22 

153 

80.14 

79.16 

0.98 

154 

80.14 

79.16 

0.98 

155 

87.91 

86.72 

1.19 

156 

82.65 

82.62 

0.03 

157 

74.88 

75.08 

-0.20 

158 

74.88 

75.07 

-0.19 

159 

81.64 

82.85 

-1.21 

160 

81.64 

82.84 

-1.20 

161 

89.40 

90.42 

-1.02 

162 

76.13 

77.04 

-0.91 

163 

61.41 

61.64 

-0.23 

164 

90.62 

90.90 

-0.28 

165 

90.65 

90.86 

-0.21 

166 

89.35 

90.42 

-1.07 

167 

76.60 

76.27 

0.33 

168 

76.60 

76.18 

0.42 

169 

62.94 

62.69 

0.25 

170 

48.22 

47.19 

1.03 

171 

77.44 

76.55 

0.89 

172 

77.42 

76.61 

0.81 

173 

48.22 

47.16 

1.06 

174 

62.94 

62.70 

0.24 
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rot  Y2:  Residuals  Associated  with  The  Design  Points 


Design  Point 

AIM's  Response 

Postulated  Model's  Response 

Residual 

175 

76.16 

76.96 

-0.80 

176 

61.00 

61.52 

-0.52 

177 

89.31 

-0.70 

176 

67.91 

68.59 

-0.68 

179 

67.91 

68.60 

-0.69 

160 

89.31 

89.99 

-0.68 

161 

89.77 

-0.24 

162 

89.81 

90.03 

-0.22 

163 

87.32 

86.65 

0.67 

164 

89.35 

89.11 

0.24 

165 

67.91 

67.68 

0.23 

166 

67.91 

67.68 

0.23 

167 

89.31 

89.08 

0.23 

166 

87.32 

66.63 

0.69 

169 

65.90 

65.22 

0.68 

190 

65.90 

65.21 

0.69 

191 

68.37 

66.60 

-0.23 

192 

68.37 

68.61 

-0.24 

193 

88.76 

88.76 

0.00 
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Regression  Output  for  Dependent  variable:  Y3 


Model  Sub  of  Error  Sub  of  Total  Sua  of 

Squares  (SSR)  Squares  (SSB)  Squares  (S8T0)  R-Square 

1243.54  172.89  1416.43  0.8779 


Paraaeters  Of  Y3  Sorted  In  Ascending  Order 
By  Their  Sub  Of  Squares 


Type  I  Sub 

Percent 

S  tuned  Percent 

Muaber 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

1 

POSTRIC4 

*  PB111PEM 

0.003 

0.00 

0.00 

2 

MICBM 

•  P0STRIC4 

0.004 

0.00 

0.00 

3 

MMII 

*  PKEEP 

0.006 

0.00 

0.00 

4 

B-52CMC 

*  PB111PBM 

0.010 

0.00 

0.00 

5 

MMII 

•  PB111PBM 

0.025 

0.00 

0.00 

6 

MMII  I 

•  mm 

0.028 

0.00 

0.01 

7 

MICBM 

•  TRID5 

0.029 

0.00 

0.01 

8 

B-52CMC 

*  B-52CMC 

0.044 

0.00 

0.01 

9 

MMII 

•  POSC 3 

0.046 

0.00 

0.02 

10 

MMII 

•  8-52CMC 

0.052 

0.00 

0.02 

11 

MMII  I 

•  POSC 3 

0.065 

0.01 

0.02 

12 

PKEEP 

•  BIB 

0.066 

0.01 

0.03 

13 

POSC  3 

•  TRID5 

0.122 

0.01 

0.04 

14 

MMII  I 

•  B-52PBM 

0.123 

0.01 

0.05 

15 

POSC  3 

•  ATB 

0.128 

0.01 

0.06 

16 

P08TRIC4 

•  TRID5 

0.146 

0.01 

0.07 

17 

MMII  I 

•  PB111PBM 

0.164 

0.01 

0.09 

18 

MMII 

•  BIB 

0.205 

0.02 

0.10 

19 

MMII 

•  B-52PEM 

0.263 

0.02 

0.12 

20 

PB111PBM 

0.312 

0.03 

0.15 

21 

MICBM 

•  B-52CMC 

0.314 

0.03 

0.17 

22 

TRID5 

•  B-52PEM 

0.328 

0.03 

0.20 

23 

MUII 

•  ATB 

0.336 

0.03 

0.23 

24 

BIB 

*  BIB 

0.342 

0.03 

0.25 

25 

B-52PEM 

*  BIB 

0.345 

0.03 

0.28 

26 

B-52PEM 

•  ATB 

0.360 

0.03 

0.31 

27 

PKEEP 

•  MICBM 

0.416 

0.03 

0.34 

28 

PKEEP 

•  PB111PEM 

0.473 

0.04 

0.38 

29 

PKEEP 

•  POSC 3 

0.574 

0.05 

0.43 

30 

mu 

•  TRID5 

0.575 

0.05 

0.47 

31 

POSTRIC4 

•  BIB 

0.605 

0.05 

0.52 

32 

P08TRIC4 

•  B-52CMC 

0.605 

0.05 

0.57 

33 

PB111PEM 

•  ATB 

0.620 

0.05 

0.62 

34 

mu 

•  POSTRIC4 

0.664 

0.05 

0.68 

35 

mu 

•  MICBM 

0.664 

0.05 

0.73 

36 

TRID5 

•  BIB 

0.710 

0.06 

0.79 
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Parameters  of  Y3  Sorted  In  Ascending  Order 
By  Their  Sum  Of  Squares 


Type  I  Sum 

Percent 

SuMed  Percent 

Number 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

37 

POSC  3 

•  FB111PBN 

0.718 

0.06 

0.84 

3S 

TBI05 

•  PB111PBM 

0.770 

0.06 

0.91 

39 

MI  CBM 

•  POSC 3 

0.815 

0.07 

0.97 

40 

POSC  3 

•  B-52PBM 

0.842 

0.07 

1.04 

41 

POSTRIC4 

•  ATB 

0.894 

0.07 

1.11 

42 

POSC  3 

•  BIB 

0.925 

0.07 

1.18 

43 

MICBM 

0.958 

0.08 

1.26 

44 

MMII 

*  mm 

0.980 

0.08 

1.34 

45 

B-52PBM 

*  FB111PEN 

1.097 

0.09 

1.43 

46 

B-52CMC 

1.216 

0.10 

1.53 

47 

MICBM 

•  B-52PBN 

1.216 

0.10 

1.62 

48 

POSTRIC4 

*  B-52PBM 

1.254 

0.10 

1.73 

49 

MICBM 

•  FB111PEN 

1.415 

0.11 

1.84 

SO 

MMIII 

•  POSTRIC4 

1.452 

0.12 

1.96 

51 

MMII 

•  ATB 

1.563 

0.13 

2.08 

52 

B-S2PBM 

•  B-52CMC 

1.690 

0.14 

2.22 

53 

MMIII 

•  MICBM 

1.703 

0.14 

2.35 

54 

PB111PBN 

•  BIB 

2.250 

0.18 

2.54 

55 

TRID5 

•  ATB 

2.379 

0.19 

2.73 

56 

MICBM 

•  BIB 

2.496 

0.20 

2.93 

57 

IWII 

2.592 

0.21 

3.14 

58 

PKBBP 

•  ATB 

3.106 

0.25 

3.39 

59 

B-52PBM 

•  B-52PBM 

3.341 

0.27 

3.65 

60 

POSC  3 

•  POSTRIC4 

3.450 

0.28 

3.93 

61 

FB111PBN 

•  PB111PBM 

4.960 

0.40 

4.33 

62 

MMII 

•  mu 

5.118 

0.41 

4.74 

63 

BIB 

•  ATB 

5.534 

0.45 

5.19 

64 

POSC  3 

5.814 

0.47 

5.65 

65 

POSC3 

•  B-52CMC 

5.917 

0.48 

6.13 

66 

PKBBP 

•  PKBBP 

6.599 

0.53 

6.66 

67 

MICBM 

•  ATB 

7.480 

0.60 

7.26 

68 

PKBBP 

•  B-52PBM 

7.535 

0.61 

7.87 

69 

MMIII 

«  BIB 

8.556 

0.69 

8.56 

70 

PKBBP 

•  P08TRIC4 

8.940 

0.72 

9.28 

71 

mm 

*  TRID5 

9.030 

0.73 

10.00 

72 

ATB 

*  ATB 

11.209 

0.90 

10.90 

73 

ATB 

11.972 

0.96 

11.87 

74 

B-52PBM 

13.377 

1.08 

12.94 

75 

PKBBP 

•  B- 5 2 CMC 

13.794 

1.11 

14.05 

76 

mm 

•  B-52CMC 

15.602 

1.25 

15.31 

77 

POSTRIC4 

•  P08TRIC4 

16.403 

1.32 

16.62 

78 

B-52CMC 

•  ATB 

17.935 

1.44 

18.07 

79 

PKBBP 

•  TRID5 

20.070 

1.61 

19.68 

80 

MICBM 

•  MICBM 

30.349 

2.44 

22.12 

81 

mm 

•  PKBBP 

33.178 

2.67 

24.79 

82 

P08C3 

•  POSC 3 

33.447 

2.69 

27.48 
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Paraaeters  Of  Y3  Sorted  In  Ascending  order 
By  Their  Sim  Of  Squares 


Type  I  Sua 

Percent 

Suaaed  Percent 

Nuaber 

Var lable 

of  Squares 

Of  SSR 

Of  SSR 

83 

MMIII 

34.810 

2.80 

30.28 

84 

P0STRIC4 

37.119 

2.98 

33.26 

85 

B-52CMC  *  BIB 

41.441 

3.33 

36.60 

86 

BIB 

SO. 321 

4.05 

40.64 

87 

TRID5  •  B-52CHC 

51.051 

4.11 

44.75 

88 

TRIOS  *  TRIOS 

95.946 

7.72 

52.46 

89 

PKBSP 

130.074 

10.46 

62.92 

90 

TRIOS 

461.068 

37.08 

100.00 

For 

Y3: 

Residuals  < 

Associated  Vlth  The  Design  Points 

Design  Point 

ARM 

's  Response 

Postulated  Model's  Response 

Residual 

1 

81.69 

82.87 

-1.18 

2 

76.16 

75.91 

0.25 

3 

74.65 

74.90 

-0.25 

4 

81.88 

82.21 

-0.33 

5 

80.28 

79.86 

0.42 

6 

80.24 

80.26 

-0.02 

7 

79.13 

78.99 

0.14 

8 

82.33 

82.59 

-0.26 

9 

75.54 

76.16 

-0.62 

10 

75.50 

75.37 

0.13 

11 

82.33 

82.14 

0.19 

12 

78.75 

78.80 

-0.05 

13 

76.01 

75.03 

0.98 

14 

76.01 

75.57 

0.44 

15 

76.01 

76.31 

-0.30 

16 

76.01 

75.55 

0.46 

17 

85.71 

84.20 

1.51 

18 

81.43 

81.23 

0.20 

19 

78.52 

78.17 

0.35 

20 

80.19 

80.02 

0.17 

21 

74.77 

74.41 

0.36 

22 

75.92 

75.60 

0.32 

23 

75.74 

76.28 

-0.54 

24 

78.77 

79.12 

-0.35 

25 

76.43 

76.40 

0.03 

26 

74.41 

74.54 

-0.13 

27 

76.03 

76.14 

-0.11 

28 

75.70 

76.29 

-0.59 

29 

76.32 

77.44 

-1.12 

30 

76.32 

76.30 

0.02 
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For  Y3:  Residuals  Associated  with  The  Design  Points 


Design  Point 

ARM's  Response 

Postulated  Model's  Response 

Residual 

31 

75.30 

75.38 

-0.08 

32 

75.26 

75.31 

-0.05 

33 

03.41 

86.22 

-2.81 

34 

03.29 

81.89 

1.40 

35 

70.96 

77.94 

1.02 

36 

73.04 

75.13 

-1.29 

37 

73.04 

75.40 

-1.56 

30 

06.04 

86.67 

-0.63 

39 

79.56 

79.94 

-0.38 

40 

80.73 

80.14 

0.59 

41 

78.11 

78.44 

-0.33 

42 

78.96 

78.97 

-0.01 

43 

73.84 

73.53 

0.31 

44 

73.65 

73.15 

0.50 

45 

78.96 

78.04 

0.92 

46 

78.33 

77.60 

0.65 

47 

82.10 

81.78 

0.32 

40 

78.96 

77.66 

1.30 

49 

77.85 

78.06 

-0.21 

50 

75.20 

76.55 

-1.35 

51 

75.68 

75.15 

0.53 

52 

74.57 

75.61 

-1.04 

53 

74.53 

74.59 

-0.06 

54 

74.35 

76.12 

-1.77 

55 

75.13 

75.36 

-0.23 

56 

75.18 

76.39 

-1.21 

57 

76.31 

75.72 

0.59 

50 

76.89 

75.42 

1.47 

59 

75.75 

75.04 

0.71 

60 

75.75 

74.93 

0.82 

61 

76.89 

76.16 

0.73 

62 

76.27 

75.54 

0.73 

63 

75.06 

75.46 

-0.40 

64 

75.66 

74.98 

0.68 

65 

81.05 

80.90 

0.15 

66 

73.74 

75.18 

-1.44 

67 

78.23 

77.07 

1.16 

60 

76.73 

76.35 

0.38 

69 

76.73 

75.76 

0.97 

70 

81.92 

79.53 

2.39 

71 

73.61 

76.44 

-2.83 

72 

80.17 

79.67 

0.50 

73 

73.47 

74.63 

-1.16 

74 

78.23 

78.95 

-0.72 

75 

76.73 

77.55 

-0.82 

76 

76.73 

75.10 

1.63 

77 

76.94 

77.20 

-0.34 

70 

73.47 

72.10 

1.29 
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For  Y3:  Residuals  Associated  with  The  Design  points 


Design  Point 

ABH's  Response 

Postulated  Model's  Response 

Residual 

127 

78.79 

77.21 

1.58 

126 

76.66 

78.27 

-1.61 

129 

80.82 

79.56 

1.26 

130 

79.60 

79.79 

-0.19 

131 

78.14 

78.92 

-0.78 

132 

78.10 

78.59 

-0.49 

133 

78.27 

77.35 

0.92 

134 

75.87 

75.70 

0.17 

135 

75.15 

75.53 

-0.38 

136 

79.80 

79.31 

0.49 

137 

79.84 

79.39 

0.45 

138 

76.74 

78.28 

-1.54 

139 

78.17 

78.11 

0.06 

140 

78.30 

76.95 

1.35 

141 

76.55 

76.44 

0.11 

142 

74.03 

74.92 

-0.89 

143 

74.03 

75.25 

-1.22 

144 

77.66 

77.00 

0.66 

145 

79.05 

79.97 

-0.92 

146 

78.36 

76.77 

1.59 

147 

77.24 

77.17 

0.07 

148 

78.99 

78.86 

0.13 

149 

79.37 

79.18 

0.19 

150 

79.22 

79.44 

-0.22 

151 

77.14 

77.36 

-0.22 

152 

77.15 

76.58 

0.57 

153 

75.75 

76.31 

-0.56 

154 

76.89 

76.30 

0.59 

155 

75.25 

75.07 

0.18 

156 

75.25 

76.69 

-1.44 

157 

76.89 

76.34 

0.55 

158 

75.75 

75.51 

0.24 

159 

74.34 

74.67 

-0.33 

160 

75.48 

75.90 

-0.42 

161 

61.59 

82.28 

-0.69 

162 

79.78 

79.54 

0.24 

163 

78.52 

78.47 

0.05 

164 

79.72 

78.86 

0.86 

165 

78.85 

78.40 

0.45 

166 

81.62 

81.14 

0.48 

167 

78.53 

77.65 

0.88 

168 

78.96 

78.04 

0.92 

169 

76.05 

77.06 

-1.01 

170 

76.32 

76.25 

0.07 

171 

74.05 

74.88 

-0.83 

172 

74.00 

75.17 

-1.17 

173 

76.32 

76.19 

0.13 

174 

76.01 

76.31 

-0.30 
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Residuals  Associated  with  The  Design  Points 


Design  Point  ABM's  Response  Postulated  Model's  Response  Residual 


175 

176 

177 

178 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 


79.79 

78.03 

1.76 

75.80 

77.65 

-1.85 

81.10 

79.76 

1.34 

76.81 

76.57 

0.24 

74.55 

74.94 

-0.39 

78.30 

77.46 

0.84 

75.62 

75.47 

0.15 

77.99 

77.71 

0.28 

77.70 

76.68 

1.02 

78.35 

77.92 

0.43 

75.38 

75.97 

-0.59 

75.33 

75.16 

0.17 

77.50 

76.44 

1.06 

74.39 

75.26 

-0.87 

76.01 

76.72 

-0.71 

76.01 

77.47 

-1.46 

75.74 

77.25 

-1.51 

75.70 

75.69 

0.01 

75.51 

75.51 

0.00 

Regression  output  for  Dependent  variable:  Y4 


Model  Sua  of  Error  sun  of  Total  Sub  of 

Squares  (SSR)  Squares  (SSB)  Squares  (S8T0)  R-Square 

31638.00  20S8.35  33696.35  0.9389 


Paraaeters  Of  Y4  Sorted  In  Ascending  Order 
By  Their  Sua  Of  Squares 


Type  I  Sua 

Percent 

Sunned  Perc 

Huaber 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

1 

MMII 

*  B- 5  2  CMC 

0.000 

0.00 

0.00 

2 

MMII 

•  PB111PBM 

0.000 

0.00 

0.00 

3 

MMII 

*  BIB 

0.004 

0.00 

0.00 

4 

MICBM 

*  B-52CMC 

0.098 

0.00 

0.00 

5 

PKBBP 

*  MICBM 

0.117 

0.00 

0.00 

6 

mu 

•  B-52PBM 

0.194 

0.00 

0.00 

7 

MICBM 

*  BIB 

0.483 

0.00 

0.00 

8 

POSTRIC4 

•  PB1UPBM 

0.753 

0.00 

0.01 

9 

mu 

•  PKBBP 

1.118 

0.00 

0.01 

10 

mu 

•  TRIOS 

1.288 

0.00 

0.01 

11 

mu 

•  MICBM 

2.095 

0.01 

0.02 

12 

B-52CMC 

•  PB1UPBM 

2.379 

0.01 

0.03 

13 

BIB 

•  ATB 

2.890 

0.01 

0.04 

14 

mm 

•  FBlllPBM 

3.349 

0.01 

0.05 

15 

POSTRIC4 

*  P0STRIC4 

3.582 

0.01 

0.06 

16 

mu 

t  POSC 3 

3.822 

0.01 

0.07 

17 

MICBM 

*  TRID5 

4.633 

0.01 

0.08 

18 

B-52PBM 

•  PB1UPBM 

4.917 

0.02 

0.10 

19 

FB111PBM 

*  ATB 

7.715 

0.02 

0.12 

20 

MICBM 

•  FBlllPBM 

8.171 

0.03 

0.15 

21 

mu 

•  P08TRIC4 

8.512 

0.03 

0.18 

22 

PKBBP 

•  FBlllPBM 

10.224 

0.03 

0.21 

23 

TRID5 

•  FBlllPBM 

13.123 

0.04 

0.25 

24 

mm 

«  TRID5 

13.579 

0.04 

0.29 

25 

mu 

•  mm 

14.251 

0.05 

0.34 

26 

MICBM 

*  P0STRIC4 

14.383 

0.05 

0  38 

27 

mm 

•  MICBM 

15.288 

0.05 

0  43 

28 

mm 

•  PKBBP 

15.701 

0.05 

0 .48 

29 

mu 

•  ATB 

19.250 

0.06 

0  64 

30 

MICBM 

•  B-52PBM 

19.780 

0.06 

0  61 

31 

mm 

*  POSC 3 

19.803 

0.06 

0.67 

32 

P08C3 

•  FBlllPBM 

21.045 

0.07 

0  74 

33 

PB111PBM 

•  BIB 

22.326 

0.07 

0.81 

34 

mm 

•  POSTRIC4 

24.626 

0.00 

0  80 

35 

PKBBP 

•  PKBBP 

25.120 

0.08 

0  96 

36 

P08C3 

*  ATB 

30.195 

0. 10 

1  06 
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Parameters  of  Y4  sorted  in  Ascending  order 
By  Their  Sm  Of  Squares 


Type  I  Sum 

Percent 

Su—cd  Perc 

Number 

Variable 

of  Squares 

Of  SSB 

Of  8SB 

37 

B-52PBN 

•  BIB 

30.305 

0.10 

1.15 

38 

HMIII 

•  B-52PBM 

33.252 

0.11 

1.26 

39 

HI  CBM 

*  ATB 

42.023 

0.13 

1.39 

40 

HMIII 

*  mm 

44.002 

0.14 

1.53 

41 

B-52PBN 

*  ATB 

46.547 

0.15 

1.68 

42 

PKEBP 

•  BIB 

46.717 

0.15 

1.83 

43 

B-52PBM 

*  8-52CMC 

47.231 

0.15 

1.98 

44 

HI  CBM 

t  poSC 3 

47.990 

0.15 

2.13 

45 

PKBBP 

*  TSID5 

50.304 

0.16 

2.29 

46 

POSTS IC4 

*  BIB 

54.575 

0.17 

2.46 

47 

POSC  3 

•  POSTS I C4 

54.871 

0.17 

2.63 

48 

POSTS IC4 

*  B-52PBM 

55.094 

0.17 

2.81 

49 

MMII 

59.367 

0.19 

2.99 

$0 

POSC  3 

*  BIB 

61.466 

0.19 

3.19 

51 

PKBBP 

•  B-52PBM 

72.293 

0.23 

3.42 

52 

P0STSIC4 

«  B-52CMC 

79.255 

0.25 

3.67 

53 

HMIII 

•  ATB 

81.857 

0.26 

3.93 

54 

TBID5 

•  B-52PBM 

81.993 

0.26 

4.18 

55 

POSTS I C4 

*  TSID5 

85.701 

0.27 

4.46 

56 

B-52PBM 

•  B-52PBM 

99.317 

0.31 

4.77 

57 

POSC3 

•  B-52PBM 

107.381 

0.34 

5.11 

58 

mm 

•  B-52CMC 

112.307 

0.35 

5.46 

59 

TSID5 

•  ATB 

113.796 

0.36 

5.82 

60 

PKBBP 

•  ATB 

116.532 

0.37 

6.19 

61 

PKBBP 

*  POSC3 

128.142 

0.41 

6.60 

62 

PKBBP 

•  POSTS I C4 

128.312 

0.41 

7.00 

63 

BIB 

*  BIB 

130.637 

0.41 

7.42 

64 

MI  CBM 

•  MICBM 

131.454 

0.42 

7.83 

65 

P08C3 

*  B-52CMC 

131.733 

0.42 

8.25 

66 

PB111PBM 

•  PBlllPBN 

134.232 

0.42 

8.67 

67 

mu 

•  mil 

152.067 

0.48 

9.15 

68 

B-52CMC 

•  ATB 

182.048 

0.58 

9.73 

69 

TSID5 

•  BIB 

195.720 

0.62 

10.35 

70 

POSC  3 

*  TSID5 

201.498 

0.64 

10.98 

71 

PB111PBM 

208.117 

0.66 

11.64 

72 

P08TSIC4 

*  ATB 

219.661 

0.69 

12.34 

73 

B-52CMC 

•  BIB 

224.925 

0.71 

13.05 

74 

mm 

•  BIB 

226.051 

0.71 

13.76 

75 

ATB 

*  ATB 

254.790 

0.81 

14.57 

76 

PKBBP 

*  B-52CMC 

278.362 

0.88 

15.45 

77 

P0SC3 

•  POSC 3 

279.640 

0.88 

16.33 

78 

MICBM 

327.565 

1.04 

17.37 

79 

B-52CMC 

•  B- 5 2 CMC 

499.011 

1.58 

18.94 

80 

TRID5 

•  T8ID5 

527.313 

1.67 

20.61 

81 

TRID5 

*  B-52CMC 

725.090 

2.29 

22.90 

82 

mm 

1235.347 

3.90 

26.81 

Parameters  Of  Y4  sorted  In  Ascending  order 
By  Their  Sum  Of  Squares 


Number 

Variable 

Type  I  Sum 
of  Squares 

Percent 

Of  SSR 

Summed  Percent 
Of  SSR 

S3 

B-52PBN 

1362.440 

4.31 

31.11 

84 

BIB 

1792.358 

5.67 

36.78 

05 

ATB 

1959.722 

6.19 

42.97 

86 

PKB8P 

2199.727 

6.95 

49.92 

87 

POSTRIC4 

2581.148 

8.16 

58.08 

88 

B-52CHC 

3720.005 

11.76 

69.84 

89 

POSC  3 

3830.991 

12.11 

81.95 

90 

TRIOS 

5710.825 

18.  OS 

100.00 

For 

Y4:  Residuals  Associated  With  The  Design  Points 

Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

1 

86.93 

88.47 

-1.54 

2 

75.93 

78.92 

-2.99 

3 

63.67 

59.55 

4.12 

4 

79.82 

83.30 

-3.48 

5 

74.79 

72.24 

2.55 

6 

82.21 

81.86 

0.35 

7 

80.78 

83.20 

-2.42 

8 

85.08 

86.04 

-0.96 

9 

73.55 

75.68 

-2.13 

10 

52.32 

54.36 

-2.04 

11 

78.28 

78.91 

-0.63 

12 

74.20 

71.63 

2.57 

13 

45.35 

43.39 

1.96 

14 

70.95 

69.17 

1.78 

15 

70.95 

68.63 

2.32 

16 

45.35 

44.81 

0.54 

17 

80.67 

79.30 

1.37 

18 

79.06 

80.07 

-1.01 

19 

73.72 

-71.81 

1.91 

20 

76.14 

78.46 

-2.32 

21 

67.77 

67.30 

0.47 

22 

76.82 

79.47 

-2.65 

23 

73.78 

73.22 

0.56 

24 

77.49 

77.01 

0.48 

25 

74.97 

73.71 

1.26 

26 

60.66 

60.48 

0.18 

27 

72.44 

71.21 

1.23 

28 

55.37 

56.09 

-0.72 

29 

37.22 

36.86 

0.36 

30 

61.26 

61.42 

-0.16 
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Foe  Y4: 

Residuals 

Associated  with  The  Design  Points 

Design  Point  ASH' 

s  Response 

Postulated  Model's  Response 

Residual 

31 

72.98 

71.74 

1.24  j 

32 

49.94 

52.15 

-2.21 

33 

86.59 

86.51 

0.08 

34 

82.31 

90.47 

-8.16 

35 

42.13 

53.49 

-11.36 

36 

72.53 

76.46 

-3.93  1 

37 

72.53 

72.68 

-0.15 

38 

83.00 

80.58 

2.42 

39 

77.43 

71.38 

6.05 

40 

78.77 

1  6.97 

1.80 

41 

75.37 

69.13 

6.24 

42 

42.13 

39.24 

2.89 

43 

72.53 

74.01 

-1.48  ; 

44 

72.64 

70.57 

2.07 

45 

42.13 

36.12 

6.01 

46 

73.09 

63.85 

9.24 

47 

81.02 

84.85 

-3.83 

48 

42.13 

50.03 

-7.90  ; 

49 

76.88 

70.78 

6.10 

50 

76.89 

71.58 

5.31 

51 

72.27 

68.65 

3.62 

52 

74.71 

70.06 

4.65  j 

53 

54.68 

55.17 

-0.49 

54 

71.84 

66.24 

5.60  1 

55 

58.45 

61.49 

-3.04 

56 

75.00 

72.95 

2.05  : 

57 

72.64 

71.74 

0.90 

58 

58.18 

64.36 

-6.18 

59 

66.02 

67.79 

-1.77 

60 

40.24 

45.96 

-5.72 

61 

32.26 

37.94 

-5.68 

62 

50.46 

55.69 

-5.23  t 

63 

64.81 

62.46 

2.35  ' 

64 

46.70 

49.17 

-2.47  < 

65 

80.87 

75.18 

5.69 

66 

79.57 

78.56 

1.01 

67 

67.73 

66.00 

1.73 

68 

77.71 

77.62 

0.09 

69 

67.69 

67.86 

-0.17 

70 

72.91 

74.32 

-1.41  ) 

71 

67.03 

63.66 

3.37 

72 

73.93 

71.92 

2.01 

73 

72.64 

69.75 

2.89 

74 

42.03 

45.72 

-3.69 

75 

65.92 

62.88 

3.04 

76 

41.99 

45.72 

-3.73  j 

77 

18.19 

21.17 

-2.98 

78 

48.91 

54.11 

-5.20  : 

- 
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For  T4:  Residuals  Associated  with  The  Design  Points 


Design  Point  AIM's  Response  Postulated  Model's  Response  Residual 


13.47 

72.62 

0.85 

'2.72 

63.54 

9.18 

'9.46 

78.21 

1.27 

'5.90 

77.82 

-1.92 

'6.17 

63.23 

2.94 

'3.73 

74.10 

-0.37 

'2.55 

70.20 

2.35 

'6.06 

78.10 

-0.04 

'7.18 

80.55 

-3.37 

'8.92 

79.21 

-0.29 

'4.07 

74.43 

-0.36 

>4.98 

56.93 

-1.95 

'2.47 

72.19 

0.26 

'2.08 

69.73 

2.35 

16.29 

47.99 

-1.70 

'0.09 

69.29 

0.80 

'2.93 

71.22 

1.71 

>1.15 

52.85 

-1.70 

>4.99 

64.99 

0.00 
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Regression  Output  for  Dependent  variable:  Y5 

) 

1 

Model  Sua  of 

Brror  Sua  of 

Total  Sua  of 

1  Squares  (88R) 

Squares  (SSB) 

Squares 

(SSTO) 

R-Square 

10786.68 

267.84 

11054 

.52 

0.9758 

Parameters  Of  Y5  Sorted 

In  Ascending  Order 

l 

By  The Ir 

Sua  Of  Squares 

l 

Type 

I  Sua 

Percent 

Suaaed  Percent 

1  Number  Variable 

of  Squares 

Of  SSR 

Of  SSR 

P  1 

HI  CBM 

•  B-52CMC 

0.000 

0.00 

0.00 

F  2 

NHI I 

•  FB1UPBM 

0.001 

0.00 

0.00 

F  3 

MM  1 1 

*  B-52CMC 

0.004 

0.00 

0.00 

t  4 

PKESP 

•  MICBM 

0.008 

0.00 

0.00 

1  s 

MMI I 

•  B-52PBN 

0.012 

0.00 

0.00 

r  6 

MM  1 1 

•  BIB 

0.014 

0.00 

0.00 

L  7 

mu 

•  MICBM 

0.022 

0.00 

0.00 

f  8 

P0STRIC4 

•  PB111PBM 

0.076 

0.00 

0.00 

■  9 

mu 

•  mm 

0.160 

0.00 

0.00 

h  1° 

mu 

•  PKBKP 

0.207 

0.00 

0.00 

1  11 

ATB 

*  ATB 

0.266 

0.00 

0.01 

12 

mm 

•  MICBM 

0.278 

0.00 

0.01 

£  13 

MICBM 

•  TRID5 

0.302 

0.00 

0.01 

■:  H 

POSTRIC4 

•  POSTRIC4 

0.332 

0.00 

0.02 

15 

B-52CMC 

•  FB111PBM 

0.456 

0.00 

0.02 

i  16 

PB111PBM 

*  FB1UPBM 

0.461 

0.00 

0.02 

1  17 

B-52PBM 

•  FBI 11 PEW 

0.494 

0.00 

0.03 

F  i* 

HICBM 

•  BIB 

0.515 

0.00 

0.03 

19 

mu 

•  POSC 3 

0.697 

0.01 

0.04 

20 

mm 

•  PBlllPBM 

0.710 

o.ot 

0.05 

21 

BIB 

•  BIB 

0.770 

0.01 

0.05 

t  22 

MICBM 

•  FB111PFU 

0.852 

0.01 

0.06 

!  23 

PBlllPBM 

*  ATB 

0.980 

0.01 

0.07 

•  24 

mu 

*  POSTRIC4 

1.108 

0.01 

0.08 

t  25 

B-52PBM 

•  B-52PBM 

1.185 

0.01 

0.09 

26 

TRID5 

•  FB111PBM 

1.850 

0.02 

0.11 

:  27 

PKBSP 

•  FB111PBH 

2.103 

0.02 

0.13 

s  28 

mu 

*  ATB 

2.110 

0.02 

0.15 

I  29 

MICBM 

•  MICBM 

2.410 

0.02 

0.17 

E  30 

MICBM 

•  B-52PRH 

2.681 

0.02 

0.20 

^  31 

HICBM 

*  POSTRIC4 

2.698 

0.03 

0.22 

5  32 

PB1UPBM 

•  BIB 

2.781 

0.03 

0.25 

&  33 

mu 

*  mu 

2.841 

0.03 

0.27 

34 

POSC  3 

•  PBlllPBM 

2.848 

0.03 

0.30 

1  35 

mm 

•  P08C3 

3.133 

0.03 

0.33 

■:  36 

> 

mm 

*  POSTS IC4 

3.930 

0.04 

0.36 

4 

t 

* 

\ 
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Parameters  of  Y5  sorted  In  Ascending  order 
By  Their  Sum  Of  Squares 


Type  I  Sum 

Percent 

Stumed  Perce 

Humber 

Variable 

of  Squares 

Of  SSS 

Of  S8R 

37 

B-52PBM 

*  BIB 

3.990 

0.04 

0.40 

38 

MM  1 1 

•  TRID5 

4.083 

0.04 

0.44 

39 

MICBM 

•  ATB 

4.337 

0.04 

0.48 

40 

BIB 

•  ATB 

4.484 

0.04 

0.52 

41 

PKBBP 

*  TRID5 

4.709 

0.04 

0.56 

42 

MM  1 1 1 

*  B-52PBM 

5.437 

0.05 

0.61 

43 

MMIII 

•  PKBBP 

5.605 

0.05 

0.67 

44 

POSC  3 

•  POSC 3 

5.656 

0.05 

0.72 

45 

B-52PBN 

•  B-52CMC 

6.350 

0.06 

0.78 

46 

PKBBP 

*  PKBBP 

6.487 

0.06 

0.84 

47 

POSC3 

•  ATB 

6.490 

0.06 

0.90 

48 

B-52PBM 

*  ATB 

7.023 

0.07 

0.96 

49 

MICBM 

*  POSC3 

7.089 

0.07 

1.03 

50 

TRID5 

*  TRID5 

7.152 

0.07 

1.10 

51 

POSTRIC4 

*  B-52PBM 

7.604 

0.07 

1.17 

52 

POSTRIC4 

•  BIB 

7.756 

0.07 

1.24 

53 

PKBBP 

*  B-52PBN 

8.080 

0.07 

1.31 

54 

PKBBP 

•  BIB 

8.165 

0.08 

1.39 

55 

POSC  3 

•  BIB 

9.429 

0.09 

1.48 

56 

POSTS IC4 

•  B-S2CMC 

12.076 

0.11 

1.59 

57 

MMIII 

•  B-52CMC 

13.104 

0.12 

1.71 

58 

B-52CMC 

*  B-52CMC 

13.127 

0.12 

1.83 

59 

POSC  3 

«  POSTS I C4 

13.213 

0.12 

1.95 

60 

MMIII 

*  ATB 

14.592 

0.14 

2.09 

61 

TRID5 

*  B-52PEH 

14.726 

0.14 

2.23 

62 

POSC  3 

*  B-52PEN 

14.803 

0.14 

2.36 

63 

POSTRIC4 

*  TRID5 

15.366 

0.14 

2.51 

64 

PKBBP 

*  ATB 

16.261 

0.15 

2.66 

65 

MMIII 

*  MMIII 

16.453 

0.15 

2.81 

66 

POSC  3 

•  B-52CMC 

17.223 

0.16 

2.97 

67 

PKBBP 

*  POSTRIC4 

17.577 

0.16 

3.13 

68 

MMIII 

•  TRI05 

19.492 

0.18 

3.31 

69 

PKBBP 

•  POSC3 

21.229 

0.20 

3.51 

70 

B-52CMC 

•  BIB 

23.136 

0.21 

3.72 

71 

TRID5 

•  ATB 

23.571 

0.22 

3.94 

72 

B-52CMC 

•  ATB 

23.668 

0.22 

4.16 

73 

MMIII 

•  BIB 

30.609 

0.28 

4.44 

74 

TRID5 

•  BIB 

32.919 

0.31 

4.75 

75 

MMI I 

33.698 

0.31 

5.06 

76 

P0STRIC4 

*  ATB 

34.466 

0.32 

5.38 

77 

PKBBP 

*  B-52CMC 

37.628 

0.35 

5.73 

78 

POSC  3 

*  TRID5 

38.192 

0.35 

6.08 

79 

FB111PBN 

39.125 

0.36 

6.45 

80 

MICBM 

74.025 

0.69 

7.13 

81 

TRID5 

*  B-52CMC 

94.090 

0.87 

8.01 

82 

8-52PBM 

253.805 

2.35 

10.36 

VV 


For 

Y5 : 

Residuals 

Associated  with  The  Design  Points 

Design  Point 

AEH 

's  Response 

Postulated  Model's  Response 

Residual 

31 

76.52 

76.18 

0.34 

32 

66.78 

67.88 

-1.10 

33 

86.08 

86.33 

-0.25 

34 

84.25 

86.95 

-2.70 

35 

63.71 

67.67 

-3.96 

36 

75.38 

76.75 

-1.37 

37 

74.12 

74.37 

-0.25 

38 

85.41 

84.51 

0.90 

39 

81.10 

79.24 

1.86 

40 

81.88 

81.15 

0.73 

41 

79.79 

77.43 

2.36 

42 

57.17 

55.98 

1.19 

43 

68.83 

69.40 

-0.57 

44 

67.53 

66.93 

0.60 

45 

55.86 

53.50 

2.36 

46 

78.97 

75.51 

3.46 

47 

83.59 

85.12 

-1.53 

48 

62.45 

65.28 

-2.83 

49 

80.80 

78.48 

2.32 

50 

80.16 

78.43 

1.73 

51 

78.33 

76.84 

1.49 

52 

79.09 

77.59 

1.50 

53 

70.63 

71.07 

-0.44 

54 

77.41 

75.80 

1.61 

55 

72.33 

73.47 

-1.14 

56 

79.60 

78.80 

0.80 

57 

78.84 

78.11 

0.73 

58 

72.92 

74.88 

-1.96 

59 

75.95 

76.28 

-0.33 

60 

65.07 

67.09 

-2.02 

61 

61.98 

64.01 

-2.03 

62 

69.23 

71.08 

-1.85 

63 

74.75 

74.07 

0.68 

64 

67.54 

68.63 

-1.09 

65 

83.37 

81.13 

2.24 

66 

79.47 

79.39 

0.08 

67 

75.37 

74.40 

0.97 

68 

81.13 

80.94 

0.19 

69 

76.76 

76.60 

0.16 

70 

80.34 

80.26 

0.08 

71 

75.53 

74.83 

0.70 

72 

80.34 

79.34 

1.00 

73 

76.29 

75.43 

0.86 

74 

64.53 

66.28 

-1.75 

75 

76.02 

75.00 

1.02 

76 

65.92 

67.02 

-1.10 

77 

54.30 

55.52 

-1.22 

78 

66.28 

68.14 

-1.86 
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For  Y5:  Residuals  Associated  With  The  Design  Points 


Design  Point 

ARM'S  Response 

Postulated  Model's  Response 

Residual 

79 

76.39 

75.74 

0.65 

80 

65.24 

67.27 

-2.03 

81 

86.48 

86.84 

-0.36 

82 

79.88 

82.33 

-2.45 

83 

79.38 

81.09 

-1.71 

84 

85.98 

86.59 

-0.61 

85 

74.40 

74.50 

-0.10 

86 

75.00 

76.12 

-1.12 

87 

71.84 

70.55 

1.29 

88 

83.84 

85.20 

-1.36 

89 

77.09 

76.53 

0.56 

90 

76.55 

75.02 

1.53 

91 

83.35 

84.67 

-1.32 

92 

70.66 

68.67 

1.99 

93 

54.97 

54.15 

0.82 

94 

58.06 

57.03 

1.03 

95 

67.65 

66.74 

0.91 

96 

65.05 

64.14 

0.91 

97 

85.18 

85.09 

0.09 

98 

81.68 

82.39 

-0.71 

99 

80.20 

79.38 

0.82 

100 

83.76 

84.07 

-0.31 

101 

70.65 

69.95 

0.70 

102 

73.83 

74.79 

-0.96 

103 

72.04 

72.74 

-0.70 

104 

84.45 

84.46 

-0.01 

105 

80.93 

81.65 

-0.72 

106 

79.38 

78.53 

0.85 

107 

83.03 

83.34 

-0.31 

108 

68.51 

67.78 

0.73 

109 

57.26 

57.24 

0.02 

110 

64.52 

64.19 

0.33 

111 

66.66 

66.36 

0.30 

112 

59.41 

59.51 

-0.10 

113 

83.45 

82.68 

0.77 

114 

76.56 

78.84 

-2.28 

115 

74.34 

73.07 

1.27 

116 

81.50 

81.78 

-0.28 

117 

79.87 

78.69 

1.18 

118 

81.96 

82.11 

-0.15 

119 

78.96 

79.72 

-0.76 

120 

80.57 

81.94 

-1.37 

121 

73.43 

74.28 

-0.85 

122 

64.53 

64.89 

-0.36 

123 

78.45 

77.42 

1.03 

124 

74.62 

72.68 

1.94 

125 

57.24 

57.50 

-0.26 

126 

69.35 

69.40 

-0.05 
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r. 

r. 

<•. 

A 


! 

v 

v 

V 

i 


v 


rot 

YS : 

Residuals 

Associated  with  The  Design  Points 

Design  Point 

ABM 

•s  Response 

Postulated  Model's  Response 

Residual 

127 

74.92 

75.61 

-0.69 

128 

68.19 

67.33 

0.86 

129 

82.11 

82.23 

-0.12 

130 

81.54 

81.74 

-0.20 

131 

79.43 

77.20 

2.23 

132 

80.01 

78.36 

1.65 

133 

66.49 

68.67 

-2.18 

134 

76.30 

76.87 

-0.57 

135 

75.18 

75.24 

-0.06 

136 

81.28 

81.05 

0.23 

137 

80.69 

80.54 

0.15 

138 

78.53 

75.93 

2.60 

139 

79.14 

77.12 

2.02 

140 

65.00 

66.97 

-1.97 

141 

62.43 

64.33 

-1.90 

142 

73.65 

73.27 

0.38 

143 

75.09 

74.93 

0.16 

144 

63.65 

66.05 

-2.40 

145 

81.49 

81.01 

0.48 

146 

77.65 

78.34 

-0.69 

147 

77.04 

76.69 

0.35 

148 

80.91 

81.03 

-0.12 

149 

79.96 

78.64 

1.32 

150 

80.54 

79.28 

1.26 

151 

77.37 

77.44 

-0.07 

152 

78.50 

78.65 

-0.15 

153 

69.46 

70.45 

-0.99 

154 

66.37 

67.96 

-1.59 

155 

77.52 

77.82 

-0.30 

156 

76.39 

75.97 

0.42 

157 

65.23 

65.39 

-0.16 

158 

68.32 

68.53 

-0.21 

159 

76.47 

75.90 

0.57 

160 

73.47 

73.60 

-0.13 

161 

85.51 

86.02 

-0.51 

162 

79.69 

80.86 

-1.17 

163 

75.20 

75.69 

-0.49 

164 

82.94 

82.98 

-0.04 

165 

79.89 

78.70 

1.19 

166 

82.66 

83.92 

-1.26 

167 

77.07 

76.58 

0.49 

168 

80.15 

83.29 

-3.14 

169 

73.55 

74.10 

-0.55 

170 

66.68 

66.07 

0.61 

171 

76.99 

77.39 

-0.40 

172 

69.67 

68.50 

1.17 

173 

55.80 

54.64 

1.16 

174 

64.22 

64.83 

-0.61 
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For  Y5:  Residuals  Associated  With  The  Design  Points 


Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

175 

76.60 

76.20 

0.40 

176 

72.01 

68.87 

3.14 

177 

82.68 

82.15 

0.53 

17$ 

75.67 

76.48 

-0.81 

179 

70.73 

69.94 

0.79 

180 

79.73 

79.76 

-0.03 

181 

78.68 

77.75 

0.93 

182 

81.82 

81.79 

0.03 

183 

80.75 

81.67 

-0.92 

184 

81.84 

81.88 

-0.04 

185 

74.58 

74.76 

-0.18 

186 

66.38 

67.16 

-0.78 

187 

78.74 

78.43 

0.31 

188 

77.51 

76.58 

0.93 

189 

62.57 

63.22 

-0.65 

190 

72.61 

72.46 

0.15 

191 

74.48 

74.04 

0.44 

192 

65.14 

65.85 

-0.71 

193 

75.24 

75.24 

0.00 
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Appendix  P:  Tbe  COOiPBTg.IM  File 


The  CODBDBTS . IN  file  Is  created  by  the  RGRSSION  subroutine.  It 
contains  the  parameter  estimates  to  the  postulated  model  (eqn  2.3).  The 
first  line  lists  the  number  of  design  variables,  the  number  of  equation 
parameters,  and  the  number  of  objectives  (dependent  variables)  processed 
by  the  RGRSSIOM  subroutine.  The  lines  that  follow  first  list  the  names 
of  all  parameters  and  then  by  objective  the  parameter  estimations.  The 
parameter  estimations  are  listed  in  such  manner  as  to  correspondingly 
match  the  parameter  names  as  listed  (i.e.,  for  the  first  objective,  the 
INTERCEPT  Is  matched  with  86.45,  the  MMII*MMII  Is  matched  with  -0.01609, 
MMI1I*MMIII  Is  matched  with  -0.51133,  and  so  on). 


12  91  5 

INTERCEPT 

MM  1 1 

MMIII 

PKBBP 

MI  CBM 

POSC  3 

POSTRIC4 

TRID5 

B-52PEN 

B-52CMC 

FB111PEN 

BIB 

ATB 

MMI I 

MMIII 

PKBBP 

MICBM 

POSC3 

POSTRIC4 

TRID5 

B-52PBN 

B-52CMC 

FB111PBN 

BIB 


MMI  I 

MMIII 

PKBBP 

MICBM 

POSC  3 

P08TRIC4 

TRID5 

B-52PBN 

B-52CMC 

FB111PBN 

BIB 

ATB 


hhii 

•  mm 

mu 

•  PKBBP 

mu 

*  HICBH 

mu 

«  POSC 3 

mu 

*  POSTS I C4 

mu 

*  TSID5 

mu 

*  B-52PBH 

mu 

•  B-52CMC 

mu 

«  FB111PBN 

mu 

•  BIB 

mu 

*  ATB 

mm 

*  PKBBP 

mhiii 

•  HICBH 

mm 

*  P08C3 

mm 

*  POSTS IC4 

mm 

*  TBID5 

mm 

*  B-52PBH 

mm 

•  B-52CHC 

mm 

*  FB1UPBM 

mm 

*  BIB 

mm 

*  ATB 

PKBEP 

•  HICBH 

PKBEP 

*  POSC 3 

PKBBP 

*  P0STSIC4 

PKBEP 

*  TSID5 

PKBBP 

•  B-52PBM 

PKBBP 

*  B-52CHC 

PKBBP 

•  FB111PBM 

PKBBP 

•  BIB 

PKBBP 

•  ATB 

HICBH 

«  POSC 3 

HICBH 

*  P0STSIC4 

HICBH 

•  TSI05 

HICBH 

*  B-52PBH 

HICBH 

*  B-52CHC 

HICBH 

•  PBIUPBM 

HICBH 

*  BIB 

HICBH 

•  ATB 

P0SC3 

*  P0STSIC4 

P0SC3 

*  TBID5 

POSC  3 

*  B-52PBH 

POSC  3 

*  B-52CHC 

POSC  3 

*  PB111PBH 

P0SC3 

*  BIB 

POSC  3 

*  ATB 

P0STSIC4 

•  TRID5 

P0STRIC4 

•  B-52PBN 

P08TRIC4 

*  B-S2CMC 

P0STSIC4 

*  PBIUPBM 

POSTS I C4 

•  BIB 

POSTS IC4 

•  ATB 

TBID5 

•  B-52PBM 

T8I05 

•  B-52CMC 

254 


TRID5 

• 

FBlllPBH 

TRID5 

* 

BIB 

TRID5 

t 

ATB 

B-52PBM 

t 

B-52CNC 

B-52PBM 

• 

FB111PBM 

B-52PBM 

t 

BIB 

B-52PBM 

t 

ATB 

B-52CMC 

t 

FBlllPBH 

B-52CHC 

• 

BIB 

B-52CMC 

t 

ATB 

PB111PBM 

t 

BIB 

PB111PBM 

* 

ATB 

BIB 

t 

ATB 

1 

2 

3 

4 

5 

86.45000 

88.76000 

75.51000 

64.99000 

75.24000 

-0.01609 

-1.75246 

0.28602 

1.33445 

0.25281 

-0.51133 

-2.34020 

0.54617 

2.08109 

0.44516 

-0.97477 

-3.40793 

0.82180 

2.16828 

0.26227 

0.01656 

1.54520 

-0.22273 

-0.92820 

-0.11016 

0.06102 

0.18512 

-0.26258 

-1.55000 

-0.67047 

-0.02727 

-0.86387 

0.10586 

-0.29578 

-0.28852 

-0.37609 

-13.78309 

2.20289 

4.40445 

-0.62625 

0.34648 

-0.51926 

0.31742 

-0.80047 

-0.33078 

0.11680 

0.45707 

0.59930 

-2.11391 

-0.63336 

-0.00406 

-1.37105 

0.34977 

0.29055 

-0.08922 

-0.12992 

-3.25957 

0.82430 

1.07156 

-0.06766 

-0.07195 

-9.45887 

0.97586 

4.65266 

0.15023 

0.32438 

1.07297 

0.20125 

0.96313 

0.72563 

0.69203 

2.44594 

0.73750 

4.39344 

2.64250 

-1.02516 

7.15078 

1.42563 

5.86266 

4.23969 

-0.34062 

0.61109 

0.12234 

2.26234 

1.07547 

0.38688 

0.00703 

0.30141 

7.73688 

3.38563 

0.36109 

0.00359 

0.76156 

6.35063 

2.90813 

-1.48375 

15.93984 

2.68406 

9.44625 

7.89703 

-0.54375 

-0.00109 

0.45719 

4.61391 

1.99141 

0.16781 

-0.00922 

-0.13781 

7.62406 

3.20156 

0.03375 

0.00078 

0.06984 

1.80328 

0.78188 

0.41266 

3.76719 

0.88672 

5.29203 

3.31078 

0.06219 

10.70797 

0.43250 

5.53359 

4.75719 

-0.72375 

-0.70812 

-0.24750 

0.94375 

0.10000 

-0.18937 

-0.96062 

0.01938 

0.26438 

-0.11375 

-0.25500 

-0.62000 

0.20375 

0.36188 

0.03687 

-0.13750 

0.00188 

0.05375 

-0.48875 

-0.20875 

-0.05000 

0.00000 

0.20375 

-0.72937 

-0.26313 

-0.13031 

-1.34125 

0.13406 

-0.20062 

-0.35719 

-0.08313 

-0.00563 

0.12813 

-0.11000 

-0.02688 

-0.01188 

0.00187 

-0.05688 

0.00063 

-0.01500 

0.01563 

-0.00187 

-0.03938 

0.00312 

-0.00625 

0.06313 

-0.00562 

-0.11312 

-0.01625 

-0.02937 

0.20250 

-0.00250 

0.31250 

-1.09687 

-0.36312 

-0.73187 

-2.01875 

1.44000 

-0.99062 

-0.59187 

-0.41500 

-1.43687 

0.32625 

0.97750 

0.13188 

m 


..y.v.r.y..- 
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0.11625 

-0.01313 

0.06375 

-1.11250 

-0.44250 

-0.34562 

-0.01000 

0.30125 

-1.24063 

-0.49563 

-0.56875 

-3.84438 

0.75125 

-0.92125 

-1.10375 

0.01094 

0.00750 

0.06188 

-1.01937 

-0.41219 

-0.23250 

-0.00125 

0.98750 

-2.64937 

-0.90500 

0.06500 

0.00437 

-0.10125 

-0.45750 

-0.21063 

0.21250 

-0.00562 

0.73125 

-3.75875 

-1.38312 

-0.31000 

0.00125 

0.14500 

-2.26188 

-0.95500 

-0.93250 

0.43375 

-0.16125 

0.08563 

-0.02250 

-0.07562 

0.02375 

0.18938 

-2.83000 

-1.15187 

-0.26562 

-0.00500 

0.74750 

-2.83187 

-1.04812 

-0.91125 

-6.73125 

1.12000 

1.77313 

-0.54250 

0.16437 

0.00250 

0.68625 

-2.12563 

-0.71063 

0.00594 

-0.00031 

0.65656 

-2.94937 

-1.08437 

0.14437 

0.00687 

-0.17188 

-0.79938 

-0.36250 

-0.04063 

-0.02625 

0.06437 

-1.70875 

-0.71438 

0.24063 

-0.02625 

0.44063 

-2.69875 

-1.00812 

0.09000 

0.00000 

0.22563 

-1.73187 

-0.66562 

-0.11375 

0.00000 

0.01500 

-0.94812 

-0.41063 

-0.86375 

-1.16875 

-0.04250 

0.53813 

-0.13750 

-0.06500 

0.00000 

0.27562 

-1.11188 

-0.40938 

-0.01000 

0.00375 

-0.14000 

0.07812 

-0.00250 

-0.01125 

0.00156 

0.21031 

-0.50531 

-0.16312 

-0.08125 

0.00312 

-0.39500 

-0.17375 

-0.17938 

-0.02125 

-0.00250 

0.68375 

-1.62063 

-0.52063 

-0.11562 

-0.00625 

-0.46437 

-1.85187 

-0.90875 

-0.21000 

-0.00438 

-0.08750 

-3.54875 

-1.54500 

0.63000 

0.00000 

0.22937 

-2.59062 

-0.96187 

0.18437 

0.00750 

0.60813 

-2.86937 

-1.03750 

0.08375 

0.00000 

0.21187 

-1.14688 

-0.42188 

0.02563 

-0.01000 

0.17000 

-1.38594 

-0.54281 

-0.25438 

-0.02125 

-0.08938 

-1.37375 

-0.63688 

-0.22937 

0.00188 

0.09563 

-2.31437 

-0.98000 

0.22812 

-0.00125 

0.28000 

-1.85562 

-0.68937 

0.18562 

0.00500 

0.19438 

-2.22563 

-0.86875 

0.20688 

0.00062 

-0.01438 

-0.21688 

-0.06875 

0.28312 

0.00625 

0.19437 

-1.84688 

-0.69625 

0.21219 

0.00781 

0.16719 

-2.62000 

-1.03781 

0.26187 

-0.00437 

-0.14312 

-2.26375 

-0.95937 

-0.14625 

-0.00375 

1.78625 

-6.73188 

-2.42500 

-0.09313 

0.00438 

0.21938 

-0.90562 

-0.34000 

-0.07687 

-0.00438 

0.21062 

-3.49750 

-1.43438 

0.04063 

-0.00062 

-0.38563 

-2.66687 

-1.21375 

0.13500 

0.00500 

0.32500 

-1.71812 

-0.63000 

-0.05375 

0.00000 

0.26188 

-0.55438 

-0.17562 

0.38063 

-0.00187 

0.14688 

-1.37625 

-0.49937 

0.16750 

0.00000 

0.15000 

-1.70563 

-0.66250 

-0.09313 

-0.00562 

0.02438 

-0.38562 

-0.16875 

-0.07937 

-0.01000 

1.60938 

-3.74938 

-1.20250 

-0.42000 

0.00125 

1.05875 

-3.37312 

-1.21625 

-0.07625 

-0.00062 

0.37500 

-1.18125 

-0.41688 

-0.01312 

-0.00437 

0.19688 

-0.69437 

-0.24750 

0.03563 

-3.96875 

0.58813 

0.42500 

-0.52938 

v  v,  nr  n."  wy^.;  vvvvTnrvv*v^^nr.Ti\r^^v.'winj« -a-*  -yr  -.■ 


Appendix  Oi  SAS  Input  Code 

The  following  code  was  used  to  execute  the  SAS's  regression 
package.  The  sane  statistics  as  those  calculated  by  the  RGRSSION 
subroutine  for  the  fifth  objective  were  computed  by  the  SAS  regression 
package  (refer  to  Appendices  0  and  P).  The  purpose  was  to  verify  the 
RGRSSIOM  subroutine.  The  SAS  output  for  this  code  is  shown  In  Appendix 
R. 


options  llnesize=80; 

filename  reglnput  'storage.dat'; 

data  rsaedaea; 

Inflle  reglnput; 

input  Mill  Mill  pkeep  alcba  posc3  postric4  trid5  b52pen  a  b52cac 
fblllpen  b  bib  c  d  atb  yl  y2  y3  y4  yS; 
if  aail=0  then  xl=-l; 

If  aal 1=225  then  xl*0; 
if  aail*450  then  xl=l; 

If  M11U100  then  x2=*-l; 
if  aalii=325  then  x2=0; 
if  aal 11=550  then  x2=»l; 
if  pkeep=0  then  x3=-l; 
if  pkeepo50  then  x3=>0; 
if  pkeep=100  then  x3*l; 

If  alcba*0  then  x4=-l; 
if  aicba=100  then  x4=0; 
if  alcbas200  then  x4*l; 

If  posc3*176  then  x5«-l; 

If  posc33240  then  x5*0; 
if  posc3=304  then  x5*l; 
if  postrlc4=240  then  x6»-l; 

If  postrlc4=312  then  x6=0; 

If  postrlc4*384  then  x6*l; 
if  trld5=0  then  x7=-l; 
if  trld5»168  then  x7»0; 
if  tr id5=336  then  x7=l; 

If  b$2pen=0  then  x8=-l; 
if  b52pen=78  then  x8=0; 

If  b52pen=156  then  x8=l; 
if  b52cac=40  then  x9=-l; 

If  b$2cacs98  then  x9=0; 

If  b52cac=156  then  x9=l; 

If  fblllpen=0  then  xa=-l; 
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If  £blllpen=30  then  xa=0 

if  fblllpen=60  then  xa=l 

if  blb=30  then  xb=-l; 

if  blb=65  then  xb*0; 

if  blb-100  then  xb=l; 

if  atb=0  then  xc=-l; 

if  atb=62  then  xc=0; 

if  atb=124  then  xc=l; 

xll=xi4xl; 

xl2=xl4x2; 

xl3»xl*x3; 

xl4=xl4x4; 

xl5*xl4x5; 

xl6=xl4x6; 

xl7=xl4x7; 

xl8=xl4x8; 

xl9=xl4x9; 

xla=xl4xa; 

xlb=xl4xb; 

xlc=xl4xc; 

x22*x24x2; 

x23=x2*x3; 

x24=x2*x4; 

x25=x24x5; 

x26>x2*x6; 

x27=x24x7; 

x28=x24x8; 

x29=x24x9; 

x2a=x24xa; 

x2b=x24xb; 

x2c=x2*xc; 

x33=x34x3; 

x34=x34x4; 

x35=x34x5; 

x36*x3*x6; 

x37*x34x7; 

x38=x34x8; 

x39=x3*x9; 

x3a=x3*xa; 

x3b=x34xb; 

x3c»x34xc; 

x44=x4*x4; 

x45*x44x5; 

x46=x44x6; 

x47=x44x7; 

x48=x44x8; 

x49=x44x9; 

x4a=x4*xa; 

x4b*x44xb; 

x4c*x44xc; 

x55*x54x5; 

x56*x54x6; 

x57=x54x7: 


2S 


xS8=xS*x$; 
x59=x5*x9; 
x5a=x5*xa; 
x5b=x5*xb; 
x5c=x5*xc; 
x66=x6*x6; 
x67=x6*x7; 
x68=x6*x8; 
x69=x6*x9; 
x6a=x6*xa; 
x6b=x6*xb; 
x6c=x6*xc; 
x77=x7*x7; 
x78=x7#x8; 
x79»x7*x9; 
x7a=x7*xa; 
x7b»x7*xb; 
x7c=x7»xc; 
x88=x8*x8; 
x89=x8*x9; 
x8a-x8*xa; 
x8b=x8*xb; 
x8c»x8*xc; 
x99=x9*x9; 
x9a=x9*xa; 
x9b=x9*xb; 
x9c»x9*xc; 
xaa=xa*xa; 
xab=xa*xb; 
xac=xa*xc; 
xbb*xb*xb; 
xbc=xb*xc; 
xcc=xc*xc; 
proc  teq; 

aodel  y5  -  xl  x2  x3  x4 
xl7  xl8  xl9 
x2b  x2c  x33 
x47  x48  x49 
x67  x6«  x69 
x8b  x8c  x99 


xS  x6  x7  x8  x9  xa  xb  xc 
xla  xlb  xlc  x22  x23  x24 
x34  x35  x36  x37  x38  x39 
x4a  x4b  x4c  xSS  x56  x57 
x6a  x6b  x6c  x77  x78  x79 
x9a  x9b  x9c  xaa  xab  xac 


xl 1  xl2  xl3  xl4  xl5  xl6 
x25  x26  x27  x28  x29  x2a 
x3a  x3b  x3c  x44  x45  x46 
x58  x59  xSa  xSb  xSc  x66 
x7a  x7b  x7c  x88  x89  x8a 
xbb  xbc  xcc  /  sal  p; 
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The  regression  output  from  SAS  for  the  fifth  objective  is  listed 
below.  To  verify  the  RGRSSION  subroutine,  the  statistics  that  the 
RGRSSION  subroutine  produces  (Appendices  0  and  P)  was  compared  to  the 
same  statistic  produced  by  SAS.  (Note:  SAS  does  not  list  the  parameter 
estimates  In  the  same  order  as  Appendix  P  does.) 


SAS  17:18  FRIDAY,  MARCH  13,  1987  33 


DSP  VARIABLE:  Y5 


ANALYSIS  OP  VARIANCE 


SUM 

OP 

MEAN 

SOURCB 

DP 

SQUARES 

SQUARE 

P  VALUE 

PROB>P 

HODBL 

90 

10786 

.68 

119.852 

45.642 

0.0001 

ERROR 

102 

267.8438 

2.62592 

C  TOTAL 

192 

11054 

.52 

ROOT 

MSE 

1.620469 

R- SQUARE 

0.9758 

DBP 

MEAN 

74.6743 

ADJ  R-SQ 

0.9544 

C.V. 

2.170049 

PARAMETER  ESTIMATES 

PARAMETER 

STANDARD 

T  FOR  HO: 

VARIABLE 

DP 

ESTIMATE 

BRROR 

PARAMETER =0 

PROB  >  ITI 

I NT8RC8P 

1 

75.24 

1.620469 

46.431 

0.0001 

XI 

1 

0.725625 

0.2025586 

3.582 

0.0005 

X2 

1 

2.6425 

0.2025586 

13.046 

0.0001 

X3 

1 

4.239688 

0.2025586 

20.931 

0.0001 

X4 

l 

1.075469 

0.2025586 

5.309 

0.0001 

X5 

1 

3.385625 

0.2025586 

16.714 

0.0001 

X6 

1 

2.908125 

0.2025586 

14.357 

0.0001 

X7 

1 

7.897031 

0.2025586 

38.986 

0.0001 

X8 

l 

1.991406 

0.2025586 

9.831 

0.0001 

X9 

1 

3.201563 

0.2025586 

15.806 

0.0001 

XA 

1 

0.781875 

0.2025586 

3.860 

0.0002 

XB 

1 

3.310781 

0.2025586 

16.345 

0.0001 

XC 

1 

4.757188 

0.2025586 

23.485 

0.0001 

Xll 

1 

0.2528125 

0.4723353 

0.535 

0.5936 

X12 

1 

0.1 

0.4051173 

0.247 

0.8055 

XL  3 

1 

-0. 11376 

0.4051173 

-0.281 

0.7794 

X14 

1 

0.036876 

0.4051173 

0.091 

0.9277 

X1S 

1 

-0.20875 

0.4051173 

-0.515 

0.6075 

X16 

1 

-0.263125 

0.4051173 

-0.650 

0.5175 

X17 

1 

-0.357188 

0.2864612 

-1.247 

0.2153 

X18 

1 

-0.026875 

0.4051173 

-0.066 

0.9472 

X19 

1 

-0.015 

0.4051173 

-0.037 

0.9705 

X1A 

1 

-0.00625 

0.4051173 

-0.015 

0.9877 

X1B 

1 

-0.029375 

0.4051173 

-0.073 

0.9423 

X1C 

1 

-0.363125 

0.4051173 

-0.896 

0.3722 

X22 

1 

0.4451562 

0.4723353 

0.942 

0.3482 

X23 

1 

-0.591875 

0.4051173 

-1.461 

0.1471 

X24 

1 

0.131875 

0.4051173 

0.326 

0.7455 

X25 

1 

-0.4425 

0.4051173 

-1.092 

0.2773 

X26 

1 

-0.495625 

0.4051173 

-1.223 

0.2240 

X27 

1 

-1.10375 

0.4051173 

-2.725 

0.0076 

X28 

1 

-0.412187 

0.2864612 

-1.439 

0.1532 

X29 

1 

-0.905 

0.4051173 

-2.234 

0.0277 

X2A 

1 

-0.210625 

0.4051173 

-0.520 

0.6043 

X2B 

1 

-1.38313 

0.4051173 

-3.414 

0.0009 

X2C 

1 

-0.955 

0.4051173 

-2.357 

0.0203 

X33 

1 

0.2622656 

0.4723353 

0.555 

0.5799 

X34 

1 

-0.0225 

0.4051173 

-0.056 

0.9558 

X36 

1 

-1.04813 

0.4051173 

-2.587 

0.0111 

X37 

1 

-0.5425 

0.4051173 

-1.339 

0.1835 

X38 

1 

-0.710625 

0.4051173 

-1.754 

0.0824 

X39 

1 

-1.08438 

0.2864612 

-3.785 

0.0003 

X3A 

1 

-0.3625 

0.4051173 

-0.895 

0.3730 

X3B 

1 

-0.714375 

0.4051173 

-1.763 

0.0808 

X3C 

1 

-1.00812 

0.4051173 

-2.488 

0.0144 

X44 

1 

-0.110156 

0.4723353 

-0.233 

0.8161 

X45 

1 

-0.665625 

0.4051173 

-1.643 

0.1035 

X46 

1 

-0.410625 

0.4051173 

-1.014 

0.3132 

X47 

1 

-0.1375 

0.4051173 

-0.339 

0.7350 

X48 

l 

-0.409375 

0.4051173 

-1.011 

0.3146 

X49 

1 

-0.0025 

0.4051173 

-0.006 

0.9951 

X4A 

l 

-0.163125 

0.2864612 

-0.569 

0.5703 

X4B 

1 

-0.179375 

0.4051173 

-0.443 

0.6589 

X4C 

l 

-0.520625 

0.4051173 

-1.285 

0.2017 

X55 

1 

-0.670469 

0.4723353 

-1.419 

0.1588 

X56 

1 

-0.90875 

0.4051173 

-2.243 

0.0270 

X57 

1 

-1.545 

0.4051173 

-3.814 

0.0002 

XS8 

1 

-0.961875 

0.4051173 

-2.374 

0.0195 

X59 

1 

-1.0375 

0.4051173 

-2.561 

0.0119 

XSA 

1 

-0.421875 

0.4051173 

-1.041 

0.3002 

X5B 

1 

-0.542812 

0.2864612 

-1.895 

0.0609 

X5C 

1 

-0.636875 

0.4051173 

-1.572 

0.1190 

X66 

1 

-0.288516 

0.4723353 

-0.611 

0.5427 

X67 

1 

-0.98 

0.4051173 

-2.419 

0.0173 

X68 

1 

-0.689375 

0.4051173 

-1.702 

0.0919 

X69 

1 

-0.86875 

0.4051173 

-2.144 

0.0344 

X6A 

1 

-0.06875 

0.4051173 

-0.170 

0.8656 

X6B 

1 

-0.69625 

0.4051173 

-1.719 

0.0887 

PARAMETER 

STANDARD 

>.  WWW  rununursur*. 

T  FOR  HO: 

VARIABLE 

DF 

ESTIMATE 

BRROfi 

PARAMETERS 

PROB  >  |T| 

X6C 

1 

-1.03781 

0.2864612 

-3.623 

0.0005 

X77 

1 

-0.62625 

0.4723353 

-1.326 

0.1878 

X78 

I 

-0.959375 

0.4051173 

-2.368 

0.0198 

X79 

I 

-2.425 

0.4051173 

-5.986 

0.0001 

X7A 

1 

-0.34 

0.4051173 

-0.839 

0.4033 

X7B 

1 

-1.43438 

0.4051173 

-3.541 

0.0006 

X7C 

1 

-1.21375 

0.4051173 

-2.996 

0.0034 

X88 

1 

-0.330781 

0.4723353 

-0.700 

0.4853 

X89 

1 

-0.63 

0.4051173 

-1.555 

0.1230 

X8A 

1 

-0.175625 

0.4051173 

-0.434 

0.6656 

X8B 

1 

-0.499375 

0.4051173 

-1.233 

0.2205 

X8C 

1 

-0.6625 

0.4051173 

-1.635 

0.1051 

X99 

1 

-0.633359 

0.4723353 

-1.341 

0.1829 

X9A 

1 

-0.16875 

0.4051173 

-0.417 

0.6779 

X9B 

1 

-1.2025 

0.4051173 

-2.968 

0.0037 

X9C 

1 

-1.21625 

0.4051173 

-3.002 

0.0034 

XAA 

I 

-0.0892188 

0.4723353 

-0.189 

0.8506 

XAB 

1 

-0.416875 

0.4051173 

-1.029 

0.3059 

XAC 

1 

-0.2475 

0.4051173 

-0.611 

0.5426 

XBB 

1 

-0.0676563 

0.4723353 

-0.143 

0.8864 

XBC 

1 

-0.529375 

0.4051173 

-1.307 

0.1942 

VARIABLE 

DF 

TYPE  I  SS 

I NT8RCBP 

1 

1076216 

XI 

1 

33.69803 

X2 

1 

446.8996 

X3 

1 

1150.397 

X4 

l 

74.02451 

X5 

1 

733.5972 

X6 

1 

541.2602 

X7 

I 

3991.239 

X8 

I 

253.8047 

X9 

1 

656.0002 

XA 

1 

39.12503 

XB 

1 

701.5214 

XC 

l 

1448.373 

XII 

1 

2.841361 

X12 

I 

0.16 

X13 

1 

0.207025 

X14 

1 

0.02175625 

X15 

1 

0.697225 

X16 

1 

1.107756 

XI7 

1 

4.082653 

X18 

1 

0.01155625 

X19 

1 

0.0036 

X1A 

1 

0.000625 

X1B 

1 

0.01380625 

X1C 

I 

2.109756 

VAR  I  MLB 

DP 

TYPE  I  SS 

X22 

1 

16.45276 

X23 

1 

5.605056 

X24 

1 

0.2782562 

X25 

1 

3.1329 

X26 

1 

3.930306 

X27 

1 

19.49223 

X28 

1 

5.436753 

X29 

1 

13.1044 

X2A 

1 

0.7098062 

X2B 

1 

30.60856 

X2C 

1 

14.5924 

X  3  3 

1 

6.486849 

X34 

1 

0.0081 

X35 

1 

21.22906 

X36 

1 

17.57706 

X37 

1 

4.7089 

X38 

1 

8.079806 

X39 

1 

37.62781 

X3A 

1 

2.1025 

X3B 

1 

8.165306 

X3C 

1 

16.26106 

X44 

l 

2.409523 

X45 

1 

7.088906 

X46 

1 

2.697806 

X47 

1 

0.3025 

X48 

1 

2.681406 

X49 

1 

0.0001 

X4A 

1 

0.8515125 

X4B 

1 

0.5148063 

X55 

1 

5.656306 

X56 

1 

13.21322 

X57 

1 

38.1924 

X58 

1 

14.80326 

X59 

1 

17.2225 

XSA 

1 

2.847656 

XSB 

1 

9.428653 

XSC 

1 

6.489756 

X66 

1 

0.3317038 

X67 

« 

a. 

15.3664 

X68 

1 

7.603806 

X69 

1 

12.07563 

X6A 

1 

0.075625 

X6B 

1 

7.756225 

X6C 

1 

34.46575 

X77 

1 

7.151862 

X78 

1 

14.72641 

X79 

1 

94.09 

X7A 

1 

1.8496 

X7B 

1 

32.91891 

X7C 

1 

23.57103 

X88 

1 

1.184964 

VARIABLE 

OF 

TYPE  I  SS 

X89 

1 

6.3504 

X8A 

1 

0.4935063 

X8B 

1 

3.990006 

X8C 

1 

7.0225 

X99 

1 

13.12689 

X9A 

1 

0.455625 

X9B 

1 

23.1361 

X9C 

1 

23.66823 

XAA 

1 

0.4612686 

XAB 

1 

2.780556 

XAC 

1 

-0.9801 

XBB 

1 

0.7704485 

XBC 

1 

4.483806 

XCC 

1 

0.2656558 

ACTUAL 

PREDICT 

VALUE 

RESIDUAL 

1 

85.75 

85.7348 

.0151563 

2 

74.36 

75.9527 

-1.5927 

3 

68.57 

67.3939 

1.17609 

4 

82.9 

83.3561 

-.456094 

5 

80.32 

79.1936 

1.12641 

7 

82.53 

83.223 

-.692969 

8 

85.01 

85.2155 

-.205469 

9 

73.23 

74.0045 

-.774531 

10 

64.12 

64.6108 

-.490781 

11 

82.16 

82.0017 

0.158281 

12 

79.48 

78.2392 

1.24078 

13 

56.77 

56.4333 

0.336719 

14 

67.57 

67.597 

-.027031 

15 

69.47 

69.1452 

0.324844 

16 

58.67 

58.8164 

-.146406 

17 

83.88 

83.162 

0.717969 

18 

82.44 

82.8036 

-.363594 

19 

79.43 

78.6961 

0.733906 

20 

81.03 

81.812 

-.782031 

21 

73.86 

73.8414 

.0185938 

22 

78.27 

79.3839 

-1.1139 

23 

74.9 

74.7308 

0.169219 

24 

81.25 

80.8764 

0.373594 

25 

79.58 

78.8692 

0.710781 

26 

72.99 

72.7792 

0.210781 

27 

78.11 

77.5439 

0.566094 

28 

66.84 

67.2058 

-.365781 

29 

59.61 

59.5986 

.0114063 

30 

69.76 

69.8811 

-.121094 

31 

76.52 

76.183 

0.337031 

32 

66.78 

67.883 

-1.103 
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33 

86.08 

86.3319 

-.251875 

34 

84.25 

86.9525 

-2.7025 

35 

63.71 

67.6684 

-3.9584 

36 

75.38 

76.7478 

-1.3678 

37 

74.12 

74.3719 

-.251875 

38 

85.41 

84.5059 

0.904063 

39 

81.1 

79.2353 

1.86469 

40 

81.88 

81.1512 

0.72875 

41 

79.79 

77.4344 

2.35563 

42 

57.17 

55.9803 

1.18969 

43 

68.83 

69.3972 

-.567187 

44 

67.53 

66.9312 

0.59875 

45 

55.86 

53.5044 

2.35563 

46 

78.97 

75.5084 

3.46156 

47 

83.59 

85.1166 

-1.5266 

48 

62.45 

65.2825 

-2.8325 

49 

80.8 

78.4763 

2.32375 

50 

80.16 

78.4338 

1.72625 

51 

78.33 

76.8422 

1.48781 

52 

79.09 

77.5872 

1.50281 

53 

70.63 

71.0672 

-.437188 

55 

72.33 

73.4666 

-1.1366 

56 

79.6 

78.8016 

0.798437 

57 

78.84 

78.1066 

0.733437 

58 

72.92 

74.8775 

-1.9575 

59 

75.95 

76.275 

-0.325 

60 

65.07 

67.0925 

-2.0225 

61 

61.98 

64.0075 

-2.0275 

62 

69.23 

71.0841 

-1.8541 

63 

74.75 

74.0738 

0.67625 

64 

67.54 

66.6347 

-1.0947 

65 

83.37 

81.1295 

2.24047 

66 

79.47 

79.3911 

.0789063 

67 

75.37 

74.3955 

0.974531 

68 

81.13 

80.9439 

0.186094 

69 

76.76 

76.6002 

0.159844 

70 

80.34 

80.2608 

.0792188 

71 

75.53 

74.8327 

0.697344 

72 

80.34 

79.3364 

1.00359 

73 

76.29 

75.4267 

0.863281 

74 

64.53 

66.2811 

-1.7511 

75 

76.02 

75.0008 

1.01922 

76 

65.92 

67.022 

-1.102 

77 

54.3 

55.5173 

-1.2173 

78 

66.28 

68.138 

-1.858 

79 

76.39 

75.7373 

0.652656 

80 

65.24 

67.2667 

-2.0267 

81 

86.48 

86.8427 

-.362656 

82 

79.88 

82.3264 

-2.4464 

83 

79.38 

81.0852 

-1.7052 

265 


► 


k-. 


fcaaasa.  I  A*i4n *n4 


Ivl  vlv.  >.*»•.*?•  j  • 


run  jvmr  kttwi  wn  1 


I 


j 


i 


v  wvw.  •vvw.  v-V-v-jv  w  jv  .-v <j*  yr  '.t  \r*  y-»  jT»  jT*  *-* j  *j(  v  -j»  "v.  w.v.y.v.t.  »v  r-.-  -»-«.•  v  *  v  ■'<•  ■ 


ACTUAL 

PREDICT 

VALUE 

RESIDUAL 

84 

85.98 

86.5914 

-.611406 

85 

74.4 

74.5048 

-.104844 

86 

75 

76.1161 

-1.1161 

87 

71.84 

70.553 

1.28703 

88 

83.84 

85.1995 

-1.3595 

89 

77.09 

76.532 

0.557969 

90 

76.55 

75.0158 

1.53422 

91 

83.35 

84.6733 

-1.3233 

92 

70.66 

68.6667 

1.99328 

93 

54.97 

54.1542 

0.815781 

94 

58.06 

57.0305 

1.02953 

95 

67.65 

66.7448 

0.905156 

96 

65.05 

64.1436 

0.906406 

97 

85.18 

85.0864 

.0935938 

98 

81.68 

82.3911 

-.711094 

99 

80.2 

79.382 

0.817969 

100 

83.76 

84.0748 

-.314844 

101 

70.65 

69.9452 

0.704844 

103 

72.04 

72.7411 

-.701094 

104 

84.45 

84.462 

-.012031 

105 

80.93 

81.6492 

-.719219 

104 

84.45 

84.462 

-.012031 

105 

80.93 

81.6492 

-.719219 

106 

79.38 

78.5327 

0.847344 

107 

83.03 

83.343 

-.312969 

108 

68.51 

67.7845 

0.725469 

109 

57.26 

57.2367 

.0232813 

110 

64.52 

64.1908 

0.329219 

111 

66.66 

66.3614 

0.298594 

112 

59.41 

59.5148 

-.104844 

113 

83.45 

82.683 

0.767031 

114 

76.56 

78.8361 

-2.2761 

115 

74.34 

73.0705 

1.26953 

116 

81.5 

81.7823 

-.282344 

117 

79.87 

78.6889 

1.18109 

118 

81.96 

82.1095 

-.149531 

119 

78.96 

79.7202 

-.760156 

120 

80.57 

81.9423 

-1.3723 

121 

73.43 

74.2755 

-.845469 

122 

64.53 

64.8898 

-.359844 

123 

78.45 

77.4217 

1.02828 

124 

74.62 

72.6795 

1.94047 

125 

57.24 

57.4977 

-.257656 

126 

69.35 

69.4033 

-.053281 

127 

74.92 

75.6127 

-.692656 

128 

68.19 

67.327 

0.862969 

129 

82.11 

82.2306 

-.120625 

130 

81.54 

81.7419 

-.201875 

131 

79.43 

77.2 

2.23 

132 

80.01 

78.3637 

1.64625 
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PREDICT 

VALUE 
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133 

66.49 

68.6681 

-2.1781 

134 

76.3 

76.8725 

-0.5725 

135 

75.18 

75.2362 

-0.05625 

136 

81.28 

81.0494 

0.230625 

137 

80.69 

80.5356 

0.154375 

138 

78.53 

75.9337 

2.59625 

139 

79.14 

77.1225 

2.0175 

140 

65 

66.9719 

-1.9719 

141 

62.43 

64.3331 

-1.9031 

142 

73.65 

73.2725 

0.3775 

143 

75.09 

74.9337 

0.15625 

144 

63.65 

66.0544 

-2.4044 

145 

81.49 

81.0075 

0.4825 

146 

77.65 

78.3447 

-.694688 

147 

77.04 

76.6947 

0.345312 

148 

80.91 

81.025 

-0.115 

149 

79.96 

78.6428 

1.31719 

151 

77.37 

77.4441 

-.074063 

152 

78.5 

78.6463 

-0.14625 

153 

69.46 

70.4509 

-.990938 

154 

66.37 

67.9584 

-1.5884 

155 

77.52 

77.8213 

-0.30125 

156 

76.39 

75.9666 

0.423437 

157 

65.23 

65.3863 

-0.15625 

158 

68.32 

68.5313 

-0.21125 

159 

76.47 

75.8975 

0.5725 

160 

73.47 

73.595 

-0.125 

161 

85.51 

86.0242 

-.514219 

162 

79.69 

80.8586 

-1.1686 

163 

75.2 

75.6927 

-.492656 

164 

82.94 

82.9758 

-.035781 

165 

79.89 

78.6964 

1.19359 

166 

82.66 

83.9161 

-1.2561 

167 

77.07 

76.578 

0.492031 

168 

80.15 

83.2936 

-3.1436 

169 

73.55 

74.0955 

-.545469 

170 

66.68 

66.072 

0.607969 

171 

76.99 

77.3877 

-.397656 

172 

69.67 

68.5008 

1.16922 

173 

55.8 

54.6377 

1.16234 

174 

64.22 

64.8323 

-.612344 

175 

76.6 

76.203 

0.397031 

176 

72.01 

68.8658 

3.14422 

177 

82.68 

82.1523 

0.527656 

178 

75.67 

76.4811 

-.811094 

179 

70.73 

69.9367 

0.793281 

180 

79.73 

79.7592 

-.029219 

181 

78.68 

77.7545 

0.925469 

182 

81.82 

81.7902 

.0298437 

183 

80.75 

81.6652 

-.915156 
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PREDICT 

VALUE 

RESIDUAL 

184 

81.84 

81.8798 

-.039844 

185 

74.58 

74.7561 

-.176094 

186 

66.38 

67.1592 

-.779219 

187 

78.74 

78.4342 

0.305781 

188 

77.51 

76.577 

0.932969 

189 

62.57 

63.2195 

-.649531 

190 

72.61 

72.4589 

0.151094 

191 

74.48 

74.0364 

0.443594 

192 

65.14 

65.8495 

-.709531 

193 

75.24 

75.24 

-4.1B-13 

SUM  OF  RESIDUALS 

SUM  OF  SQUARED  RESIDUALS 


-2.66454B-14 

267.8438 


Appendix  8l  Tfes.  XCWQM8.III  file 

The  XCUTBQNS . IH  file  Is  created  by  the  DBCODB  subroutine.  It 
contains  the  decoded  paraaeter  estimates  for  the  postulated  equation 
(equation  2.3  in  this  case).  The  first  line  shows  the  nuaber  of  design 
variables,  the  nuaber  of  paraaeter  estiaates,  and  the  nuaber  of 
objectives  processed  by  the  DBCODB  subroutine.  The  next  nuaber  of  lines 
show  the  naae  of  each  design  paraaeter  along  with  its  range  of  values. 
Last,  the  reaalning  lines  first  give  which  objective  and  then  the  para¬ 
aeter  estiaates  for  that  objective.  The  values  shorn  in  this  appendix 
are  the  decoded  paraaeter  estiaates  for  the  coded  paraaeter  estiaates 
shown,  by  objective,  in  Appendix  P. 


12  91  5 

MM  1 1 

0.00 

450.00 

MMIII 

100.00 

550.00 

PKBBP 

0.00 

100.00 

MICBM 

0.00 

200.00 

POSC  3 

176.00 

304.00 

POSTRIC4 

240.00 

384.00 

TRID5 

0.00 

336.00 

B-52PBN 

0.00 

156.00 

B-52CMC 

40.00 

156.00 

PB111PBN 

0.00 

60.00 

BIB 

30.00 

100.00 

ATB 

0.00 

124.00 

77.324264176122 

0.011007911148 

0.026233718634 

0.101039127696 

0.026976605200 

-0.003484952535 

0.010032719584 

0.023554792172 

-0.076030512259 

-0.012053095167 


-44.068251999832 

0.037923677723 

0.076918390324 

0.482789803640 

0.009399783963 

-0.020772220255 

0.104225414709 

0.347164417615 

0.013263306598 

-0.027334587273 


108.617774456922 

-0.006888984802 

-0.034608905814 

-0.188186919048 

-0.010141193473 

0.033040349702 

-0.014357538219 

-0.042884634142 

-0.057963822172 

-0.230260844540 


•358.700617186886 

0.012140779900 

0.102736746640 

0.749967267105 

0.157526907649 

0.783224201218 

0.504962326655 

0.279168491762 

0.497093737632 

1.052439899331 


-125.214476892050 

0.012928076306 

0.054679718141 

0.387007125205 

0.069343867570 

0.333503145141 

0.233209622389 

0.185094193969 

0.189473105676 

0.380679221401 
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-0.031744688661 

-0.022099209907 

0.011530612100 

-0.000000317827 

-0.000014296296 

-0.000016832889 

-0.000011333333 

-0.000009548611 

-0.000003086420 

-0.000003447354 

-0.000004736752 

-0.000000910345 

0.000002315556 

0.000008016508 

0.000014516129 

-0.000010100346 

-0.000065055111 

-0.000018444444 

0.000008072917 

-0.000021334568 

-0.000015046296 

0.000000623362 

-0.000017816092 

0.000009629630 

0.000026984127 

-0.000022222222 

-0.000389908000 

-0.000186500000 

-0.000023631250 

-0.000079338889 

-0.000108482143 

0.000042146154 

0.000002048276 

0.000096246667 

-0.000023217143 

0.000077622581 

0.000001656000 

0.000014062500 

-0.000015798611 

-0.000051413690 

-0.000008333333 

-0.000001724138 

-0.000003750000 

-0.000023214286 

-0.000003427419 

0.000014897461 

-0.000025091146 

-0.000019531250 

0.000126201923 

0.000049668642 

0.000043619792 

0.000011441964 

-0.000064107863 


0.091265280058 

0.568970436625 

0.597974391233 

-0.000034616494 

-0.000013987556 

-0.000085388444 

-0.000027555556 

0.000000130556 

0.000000000000 

-0.000035482804 

-0.000000320798 

0.000000143295 

-0.000000277037 

-0.000000713651 

-0.000000179211 

-0.000046226173 

-0.000179444444 

-0.000063860889 

-0.000000911806 

-0.000000617284 

-0.000101703175 

0.000000427350 

-0.000000095785 

0.000000647407 

-0.000000713651 

0.000000089606 

-0.001363172000 

0.000086750000 

0.000007421875 

-0.000001388889 

-0.000801339286 

0.000000641026 

-0.000000106897 

0.000004580000 

-0.000015000000 

-0.000008467742 

0.000154520000 

0.000000000000 

0.000000000000 

-0.000069568452 

0.000000000000 

0.000000646552 

0.000000520000 

0.000000891429 

-0.000000403226 

0.000045195312 

-0.000001356337 

-0.000000407366 

0.000000000000 

0.000002020474 

0.000000000000 

-0.000004464286 

-0.000005355343 


-0.087682051040 

-0.237347513019 

-0.103181827207 

0.000005649778 

-0.000004888889 

0.000001722667 

0.000009055556 

0.000003732639 

0.000012577160 

0.000003546561 

0.000007300855 

-0.000004358621 

-0.000005834074 

-0.000014364444 

0.000022401434 

0.000010788543 

0.000128000000 

0.000014500000 

0.000004427083 

0.000018595679 

0.000019874339 

0.000003525926 

0.000075670498 

-0.000015000000 

0.000092857143 

0.000010394265 

0.000328720000 

-0.000032250000 

0.000059181250 

0.000207638889 

0.000133333333 

0.000175961538 

0.000226400000 

-0.000114586667 

0.000036782857 

0.000142138710 

-0.000022273000 

0.000035254687 

0.000002083333 

-0.000002529762 

0.000035335897 

-0.000024137931 

0.000070103333 

-0.000112857143 

0.000110282258 

-0.000064106445 

-0.000100774740 

-0.000008138021 

0.000045947516 

0.000163828125 

0.000110348958 

0.000075892857 

-0.000022525202 


0.447496049808 

0.965873900930 

0.506347899584 

0.000026359506 

0.000018641975 

0.000023500444 

0.000016083556 

-0.000033940972 

-0.000045022840 

-0.000005307407 

-0.000006267806 

0.000000048276 

0.000000462222 

-0.000002063492 

-0.000078628674 

0.000041107951 

-0.000088055111 

0.000043444444 

-0.000077256944 

-0.000076582099 

-0.000024371693 

-0.000058083761 

-0.000203016858 

-0.000067777778 

-0.000477301587 

-0.000162141935 

0.000867312000 

0.000017126000 

-0.000884375000 

-0.000786630556 

0.000211086905 

-0.000545033333 

-0.001017024138 

-0.000532920000 

-0.000976428571 

-0.000870564516 

-0.000092820000 

-0.000270604687 

-0.000131683333 

0.000032031548 

-0.000142548718 

0.000013468966 

-0.000168436667 

-0.000049642857 

-0.000261391935 

-0.000378417969 

-0.000401881510 

-0.000330054874 

-0.000518954327 

-0.000772998384 

-0.000597333333 

-0.000618723214 

-0.000346207157 


0.183295167488 

0.469928564274 

0.318958846779 

0.000004993778 

0.000001975309 

-0.000010111111 

0.000001638667 

-0.000014496528 

-0.000016242593 

-0.000009449471 

-0.000001531624 

-0.000001149425 

-0.000000925926 

-0.000003729524 

-0.000026030108 

0.000008793284 

-0.000052610667 

0.000005861333 

-0.000030729167 

-0.000030594444 

-0.000029199735 

-0.000023486610 

-0.000069348659 

-0.000031204444 

-0.000175634286 

-0.000068458781 

0.000104908000 

-0.000004500000 

-0.000359959375 

-0.000291144444 

-0.000064583333 

-0.000182212821 

-0.000373920690 

-0.000241666667 

-0.000408217143 

-0.000325200000 

-0.000011016000 

-0.000104003125 

-0.000057031944 

-0.000008184524 

-0.000052484615 

-0.000000431034 

-0.000054373333 

-0.000051251429 

-0.000083972581 

-0.000163688965 

-0.000197211372 

-0.000143694196 

-0.000192682292 

-0.000279498922 

-0.000219729167 

-0.000242325893 

-0.000160504032 
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r 

>• 

V 

-0.000005260417 

-0.000166641590 

0.000020420525 

-0.000057056327 

-0.000018962467 

0.000000155423 

0.000007905919 

-0.000191333499 

!* 

0.000040619658 

-0.000000222578 

0.000049857550 

-0.000330416667 

0.000044449234 

0.000001197318 

0.000046546935 

-0.000532957375 

r 

0.000095777778 

0.000000287037 

-0.000006657407 

-0.000100407407 

B 

0.000112349206 

0.000002480159 

0.000077130952 

-0.000732888889 

r 

0.000047533602 

0.000001749552 

0.000037452957 

-0.000586917563 

K 

-0.000013325184 

-0.000488346443 

0.000078050241 

0.000156053359 

C 

0.000019983974 

-0.000000333486 

-0.000010921856 

-0.000172752595 

-0.000015009236 

-0.000000384852 

0.000183317939 

-0.000690874384 

-0.000018478175 

0.000000869048 

0.000043527778 

-0.000179686508 

-0.000013073129 

-0.000000744898 

0.000035819728 

-0.000594812925 

0.000003900730 

-0.000000059524 

-0.000037022649 

-0.000256035906 

0.000056949375 

-0.000085348455 

0.000052172913 

-0.000131569691 

0.000029840849 

0.000001105217 

0.000071839080 

-0.000379778957 

-0.000022970085 

0.000000000000 

0.000111914530 

-0.000236914530 

0.000139424908 

-0.000000684982 

0.000053802198 

-0.000504120879 

0.000034636063 

0.000000000000 

0.000031017370 

-0.000352694376 

0.000034720571 

0.000135870987 

0.000178151011 

-0.000628391795 

-0.000053522989 

-0.000003229885 

0.000014011494 

-0.000221620690 

-0.000039098522 

-0.000004926108 

0.000792798030 

-0.001846985222 

-0.000116796440 

0.000000347608 

0.000294424360 

-0.000938020022 

s. 

-0.000004511111 

-0.001523388889 

0.000388633333 

0.000322833333 

•. 

p  • 

-0.000072619048 

-0.000000590476 

0.000357142857 

-0.001125000000 

,  % 

-0.000007053763 

-0.000002349462 

0.000105849462 

-0.000373317204 

>*%. 

-0.000106057143 

-0.002660873469 

0.000672897959 

0.000874742857 

* 

0.000016419355 

-0.001828917051 

0.000271027650 

0.000195852535 

w 

-0.000018717482 

-0.002460684183 

0.000253865765 

0.001210369407 

'  j 


-0.000055655864 

-0.000081018519 

-0.000122751068 

-0.000208034004 

-0.000031828704 

-0.000276289683 

-0.000232484319 

-0.000022188563 

-0.000073211996 

-0.000248871100 

-0.000067460317 

-0.000243942177 

-0.000116527458 

-0.000054368836 

-0.000139257294 

-0.000075051282 

-0.000182919414 

-0.000136993383 

-0.000188275862 

-0.000096982759 

-0.000592364532 

-0.000338223026 

-0.000099133333 

-0.000397028571 

-0.000133064516 

-0.000055232653 

-0.000243953917 

0.000039081686 


Appendix  Ti  The  D1C0D1.0UT  Pile 


The  DECODE. OUT  file  is  cceated  from  the  DECODE  subroutine.  The 
file  contains  the  decoded  parameter  estimates  along  with  their 
respective  term  nape  for  each  response  objective  processed  through  the 
DECODE  subroutine. 


The  decoded  parameter  estimates  for  Y1  are: 


INTERCEPT 

77.324264176122 

MM  1 1 

0.011007911148 

MMIII 

0.026233718634 

PKBBP 

0.101039127696 

MI  CBM 

0.026976605200 

POSC  3 

-0.003484952535 

POSTRIC4 

0.010032719584 

TRID5 

0.023554792172 

B-52PBN 

-0.076030512259 

B-52CMC 

-0.012053095167 

FB111PBN 

-0.031744888661 

BIB 

-0.022999209907 

ATB 

0.011530612100 

MMI I 

t 

MMII 

-0.000000317827 

MMII 

• 

MMIII 

-0.000014296296 

MMI  I 

• 

PKBBP 

-0.000016832889 

MMII 

t 

MICBM 

-0.000011333333 

MMII 

• 

POSC3 

-0.000009548611 

MMII 

t 

P0STRIC4 

-0.000003086420 

MMII 

* 

TRID5 

-0.000003447354 

MMII 

• 

B-52PEN 

-0.000004736752 

MMII 

• 

B-52CMC 

-0.000000910345 

MMII 

• 

FB111PEN 

0.000002315556 

MMII 

« 

BIB 

0.000008016508 

MMII 

• 

ATB 

0.000014516129 

MMIII 

• 

MMIII 

-0.000010100346 

MMIII 

• 

PKBBP 

-0.000065055111 

MMIII 

* 

MICBM 

-0.000018444444 

MMIII 

t 

POSC  3 

0.000008072917 

MMIII 

• 

P0STRIC4 

-0.000021334568 

Mil  1 1 

• 

TRID5 

-0.000015046296 

MMIII 

* 

B-52PBN 

0.000000623362 

MMIII 

• 

B-52CMC 

-0.000017816092 

MMIII 

t 

PB111PBM 

0.000009629630 

rami 

• 

BIB 

0.000026984127 
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The  decoded  parameter  estimates  for  Y1  are: 


MM  1 1 1 

t 

ATB 

-0.000022222222 

PKBBP 

t 

PKBBP 

-0.000389908000 

PKBBP 

* 

MICBM 

-0.000186500000 

PKBBP 

• 

POSC  3 

-0.000023631250 

PKBBP 

* 

P0STRIC4 

-0.000079338889 

PKBBP 

t 

TRID5 

-0.000108482143 

PKBBP 

* 

B-52PBM 

0.000042146154 

PKBBP 

• 

B-52CMC 

0.000002048276 

PKBBP 

t 

FBlllPBM 

0.000096246667 

PKBBP 

t 

BIB 

-0.000023217143 

PKBBP 

* 

ATB 

0.000077622581 

MICBM 

* 

MICBM 

0.000001656000 

MI  CBM 

* 

POSC3 

0.000014062500 

MICBM 

* 

P0STRIC4 

-0.000015798611 

MICBM 

• 

TRID5 

-0.000051413690 

MICBM 

t 

B-52PBM 

-0.000008333333 

MICBM 

* 

B-52CMC 

-0.000001724138 

MICBM 

t 

FBlllPBM 

-0.000003750000 

MICBM 

* 

BIB 

-0.000023214266 

MICBM 

* 

ATB 

-0.000003427419 

POSC  3 

• 

POSC3 

0.000014897461 

P0SC3 

t 

POSTRIC4 

-0.000025091146 

P0SC3 

t 

TRID5 

-0.000019531250 

POSC  3 

* 

B-52PBN 

0.000126201923 

POSC3 

t 

B-52CMC 

0.000049668642 

P0SC3 

t 

FBlllPBM 

0.000043619792 

POSC3 

t 

BIB 

0.000011441964 

POSC  3 

t 

ATB 

-0.000064107863 

POSTRIC4 

t 

POSTRIC4 

-0.000005260417 

POSTRIC4 

t 

TRID5 

-0.000018962467 

POSTRIC4 

t 

B-52PBM 

0.000040619658 

P0STRIC4 

t 

B-52CMC 

0.000044449234 

POSTRIC4 

t 

FBlllPBM 

0.000095777778 

POSTRIC4 

• 

BIB 

0.000112349206 

P0STRIC4 

* 

ATB 

0.000047533602 

TRID5 

t 

TRID5 

-0.000013325184 

TRID5 

t 

B-52PBM 

0.000019983974 

TRID5 

* 

B-52CMC 

-0.000015009236 

TRID5 

* 

FBlllPBM 

-0.000018478175 

TRID5 

t 

BIB 

-0.000013073129 

TRID5 

* 

ATB 

0.000003900730 

B-S2PBN 

t 

B-52PBM 

0.000056949375 

B-52PBN 

* 

B-52CMC 

0.000029840849 

B-S2PBN 

t 

FBlllPBM 

-0.000022970085 

B-52PBM 

t 

BIB 

0.000139424908 

B-52P8M 

• 

ATB 

0.000034636063 

B-52CMC 

f 

B-52CMC 

0.000034720571 

B-52CMC 

* 

FBlllPBM 

-0.000053522989 

B-52CMC 

• 

BIB 

-0.000039098522 

B-52CMC 

• 

ATB 

-0.000116796440 

/.  %  A  VA  .V 


The  decoded  parameter  estimates  for  Yl  are 


FB111PBN  *  FB111PBN  -0.000004511111 
FB111PSN  *  BIB  -0.000072619048 
FB111PBM  *  ATB  -0.000007053763 
BIB  *  BIB  -0.000106057143 
BIB  •  ATB  0.000016419355 
ATB  *  ATB  -0.000018717482 


The  decoded  parameter  estimates  for  Y2  are: 


INTBRC8PT 

MM  1 1 

MMII1 

PKBBP 

MICBM 

POSC3 

POSTRIC4 

TRID5 

B-52PBN 

B-52CMC 

FB111PBM 

BIB 

ATB 

-44.068251999832 

0.037923677723 

0.076918390324 

0.482789803640 

0.009399783963 

-0.020772220255 

0.104225414709 

0.347164417615 

0.013263306596 

-0.027334587273 

0.091265280058 

0.568970436625 

0.597974391233 

MMII 

•  MMII 

-0.000034616494 

MMI I 

*  MMI I I 

-0.000013987556 

MMII 

•  PKBBP 

-0.000085388444 

MMII 

*  MICBM 

-0.000027555556 

MMII 

*  POSC3 

0.000000130556 

MMII 

*  POSTR1C4 

0.000000000000 

MMII 

*  TRID5 

-0.000035482804 

MMII 

*  B-52PBN 

-0.000000320798 

MMII 

*  B-52CMC 

0.000000143295 

MMII 

*  PB111PBN 

-0.000000277037 

MMII 

*  BIB 

-0.000000713651 

MMII 

*  ATB 

-0.000000179211 

MMI  1 1 

•  MMI I I 

-0.000046226173 

MMI  1 1 

•  PKBBP 

-0.000179444444 

MMI  1 1 

*  MICBM 

-0.000063860889 

MMI  1 1 

*  POSC3 

-0.000000911806 

MMI  1 1 

*  POSTRIC4 

-0.000000617284 

MMI  1 1 

*  TRID5 

-0.000101703175 

MMI  1 1 

*  B-52PBN 

0.000000427350 

MMII  I 

*  B-52CMC 

-0.000000095785 

MMI  1 1 

*  FB111PEH 

0.000000647407 

MMI  1 1 

•  BIB 

-0.000000713651 

MMI  1 1 

*  ATB 

0.000000089606 

PKBBP 

•  PKBBP 

-0.001363172000 

PKBBP 

*  MICBM 

0.000086750000 

The  decoded  parameter  estimates  for  Y2  are: 


PKBBP 

POSC3 

0.000007421875 

PKBBP 

POSTRIC4 

-0.000001388889 

PKBBP 

TRID5 

-0.000801339286 

PKBBP 

B-52PBM 

0.000000641026 

PKBBP 

B-52CMC 

-0.000000106897 

PKBBP 

PB111P8M 

0.000004580000 

PKBBP 

BIB 

-0.000015000000 

PKBBP 

ATB 

-0.000008467742 

NICBH 

MICBM 

0.000154520000 

MI  CBM 

POSC  3 

0.000000000000 

MI  CBM 

POSTRIC4 

0.000000000000 

HICBM 

TRID5 

-0.000069568452 

MI  CBM 

B-52PBN 

0.000000000000 

MICBM 

B-52CMC 

0.000000646552 

MICBM 

FB111PBH 

0.000000520000 

MICBM 

BIB 

0.000000891429 

MICBM 

ATB 

-0.000000403226 

POSC3 

POSC3 

0.000045195312 

POSC3 

POSTRIC4 

-0.000001356337 

POSC3 

TRID5 

-0.000000407366 

POSC  3 

B-52PEN 

0.0*00000000000 

POSC3 

B-52CMC 

0.000002020474 

POSC3 

FBlllPBM 

0.000000000000 

POSC3 

BIB 

-0.000004464286 

POSC3 

ATB 

-0.000005355343 

POSTRIC4 

POSTRIC4 

-0.000166641590 

POSTRIC4 

TRID5 

0.000000155423 

POSTRIC4 

B-52PBM 

-0.000000222578 

POSTRIC4 

B-52CMC 

0.000001197318 

POSTRIC4 

FBlllPBM 

0.000000287037 

POSTRIC4 

BIB 

0.000002480159 

POSTRIC4 

ATB 

0.000001749552 

TRID5 

TRID5 

-0.000488346443 

TRID5 

B-52PBN 

-0.000000333486 

TRID5 

B-52CMC 

-0.000000384852 

TRID5 

FBlllPBM 

0.000000869048 

TRID5 

BIB 

-0.000000744898 

TRID5 

ATB 

-0.000000059524 

B-52PBN 

B-52PBM 

-0.000085348455 

B-52PBM 

B-52CHC 

0.000001105217 

B-52PBM 

FBlllPBM 

0.000000000000 

B-52PBH 

BIB 

-0.000000684982 

B-52PEM 

ATB 

0.000000000000 

B-52CMC 

B-52CMC 

0.000135870987 

B-52CMC 

FBlllPBM 

-0.000003229885 

B-52CMC 

BIB 

-0.000004926108 

B-52CMC 

ATB 

0.000000347608 

FB111PBM 

FBlllPBM 

-0.001523388889 

FB111PBM 

BIB 

-0.000000590476 

PB111PBH 

ATB 

-0.000002349462 

The  decoded  parameter  estimates  for  Y2  are: 


BIB  *  BIB  -0.002660873469 
BIB  *  ATB  -0.001828917051 
ATB  *  ATB  -0.002460684183 


The  decoded  parameter  estimates  for  Y3  are: 


INTBRCBPT 

108.617774456922 

MM  1 1 

-0.006888984802 

MM1II 

-0.034608905814 

PKBBP 

-0.188186919048 

MICBH 

-0.010141193473 

POSC  3 

0.033040349702 

POSTRIC4 

-0.014357538219 

TRID5 

-0.042884634142 

B-52PEN 

-0.057963822172 

B-52CMC 

-0.230260844540 

FB111PBN 

-0.087682051040 

BIB 

-0.237347513019 

ATB 

-0.103181827207 

MM  1 1 

•  MMI  I 

0.000005649778 

MM  1 1 

*  MMI I I 

-0.000004888889 

MMI I 

*  PKBBP 

0.000001722667 

MMI I 

•  MI CBM 

0.000009055556 

MMI  I 

*  POSC 3 

0.000003732639 

MMI  I 

*  POSTRIC4 

0.000012577160 

MMI  I 

*  TRIOS 

0.000003546561 

MMI  I 

*  B-52PBM 

0.000007300855 

MMI  I 

*  B-52CMC 

-0.000004358621 

MMI  I 

*  FB111PBH 

-0.000005834074 

MMI  I 

•  BIB 

-0.000014364444 

MMI  I 

*  ATB 

0.000022401434 

MMI  1 1 

*  MMI I I 

0.000010788543 

MMI  1 1 

*  PKBBP 

0.000128000000 

MMI  1 1 

*  MICBM 

0.000014500000 

MMI  1 1 

•  POSC3 

0.000004427083 

MMI  1 1 

•  POSTRIC4 

0.000018595679 

MMI  1 1 

•  TRID5 

0.000019874339 

MMI  1 1 

•  B-52PBH 

0.000003525926 

MMI  1 1 

*  B-52CMC 

0.000075670498 

MMI  1 1 

*  PB111PBH 

-0.000015000000 

MMI  1 1 

•  BIB 

0.000092857143 

MMI  1 1 

*  ATB 

0.000010394265 

PK88P 

*  PKBBP 

0.000328720000 

PKBBP 

•  MICBH 

-0.000032250000 

PKBBP 

*  POSC3 

0.000059181250 

PKBBP 

*  POSTRIC4 

0.000207638889 

PKBBP 

•  TRID5 

0.000133333333 
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The  decoded  parameter  estimates  for  Y3  are: 


PKBEP 

B-52PBN 

0.000175961530 

PKBEP 

B-52CHC 

0.000226400000 

PKBEP 

FB111PEN 

-0.000114586667 

PKBEP 

BIB 

0.000036782857 

PKBEP 

ATB 

0.000142138710 

HICBH 

HICBH 

-0.000022273000 

HICBH 

POSC3 

0.000035254687 

H1CBM 

POSTRIC4 

0.000002083333 

HICBH 

TRID5 

-0.000002529762 

HICBH 

B-52P8H 

0.000035335897 

HICBH 

B-52CHC 

-0.000024137931 

HICBH 

FB111PBN 

0.000070103333 

HICBH 

BIB 

-0.000112857143 

HICBH 

ATB 

0.000110282258 

POSC  3 

POSC3 

-0.000064106445 

POSC3 

POSTRIC4 

-0.000100774740 

POSC3 

TRID5 

-0.000008138021 

POSC3 

B-52PBN 

0.000045947516 

POSC3 

B-52CHC 

0.000163828125 

POSC3 

FB111PEN 

0.000110348958 

POSC  3 

BIB 

0.000075892857 

POSC3 

ATB 

-0.000022525202 

POSTRIC4 

POSTRIC4 

0.000020420525 

POSTRIC4 

TRID5 

0.000007905919 

POSTRIC4 

B-52PEH 

0.000049857550 

POSTRIC4 

B-52CHC 

0.000046546935 

POSTRIC4 

FB111PEH 

-0.000006657407 

POSTRIC4 

BIB 

0.000077130952 

POSTRIC4 

ATB 

0.000037452957 

TRID5 

TRID5 

0.000078050241 

TRID5 

B-52PBH 

-0.000010921856 

TRIOS 

B-52CHC 

0.000183317939 

TRID5 

FB111PEN 

0.000043527778 

TRI05 

BIB 

0.000035819728 

TRID5 

ATB 

-0.000037022849 

B-52PBH 

B-52PBN 

0.000052172913 

B-52PBN 

B-52CHC 

0.000071839080 

B-52PBH 

FB111PBH 

0.000111914530 

B-52PEH 

BIB 

0.000053802198 

B-52PBH 

ATB 

0.000031017370 

B-52CHC 

B-52CHC 

0.000178151011 

B-52CHC 

FB111PBH 

0.000014011494 

B-S2CHC 

BIB 

0.000792798T  i<- 

B-52CHC 

ATB 

0. 000294424  tO 

FBU1PBM 

FBI 1 1PEH 

0 . 000  3  8  B  4.  33  1  <  i 

FBI l 1PBN 

BIB 

0 . 000  •  1  4  i 11  ‘ 

FB111PBH 

ATB 

U  000  1  O1'  8  4  4» 

BIB 

BIB 

0  O00k  ’.«•'•  * 

BIB 

ATB 

■  IM"  i  • 

ATB 

ATB 
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The  decoded  parameter  estimates  tor  Y4  are 


IMTB8CBPT 

MHII 

mm 

PKBBP 

HI  CBN 

P08C3 

P08TRIC4 

TRID5 

B-52PBM 

B-52CMC 

FBlllPBM 

BIB 

ATB 

mu  * 

mu 

mu 

• 

mm 

mu 

t 

PKBBP 

mu 

* 

HICBH 

mu 

* 

POSC  3 

mu 

• 

P0STRIC4 

mu 

* 

TRID5 

mu 

• 

B-52PBH 

mu 

* 

B-52CMC 

mu 

* 

FB111PBH 

mu 

* 

BIB 

mu 

* 

ATB 

mm 

* 

mm 

mm 

i 

PKBBP 

mm 

% 

HICM 

mm 

* 

POSC  3 

mui 

t 

P0STRIC4 

mm 

* 

TRID5 

mm 

• 

B-52PBM 

mm 

• 

B-52CHC 

mm 

* 

PBIUPBM 

mm 

• 

BIB 

mm 

* 

ATB 

PKBBP 

* 

PKBBP 

PKBBP 

* 

HICM 

PKBBP 

t 

P0SC3 

PKBBP 

• 

P0STRIC4 

PKBBP 

* 

TRID5 

PKBBP 

t 

B-52PBN 

PKBBP 

• 

B- 5 2 CMC 

PKBBP 

* 

PBIUPBM 

PKBBP 

* 

BIB 

PKBBP 

t 

ATB 

HI  CBM 

• 

HICM 

HI  CBM 

« 

POSC  3 

HI  CM 

• 

P08TRIC4 

HICBH 

• 

TRID5 

-358.700617186886 
0.012140779900 
0.102736748640 
0.749967267105 
0.157526907649 
0.783224201218 
0.504962326655 
0.279168491762 
0.497093737632 
1.052439899331 
0.447496049808 
0.965873900930 
0.506347899584 
0.000026359506 
0.000018641975 
0.000023500444 
0.000016083556 
-0.000033940972 
-0.000045022840 
-0.000005307407 
-0.000006267806 
0.000000048276 
0.000000462222 
-0.000002063492 
-0.000 078628674 
0.000041107951 
-0.000088055111 
0.000043444444 
-0.000077256944 
-0.000076582099 
-0.000024371693 
-0.000058083761 
-0.000203016858 
-0.000067777778 
-0.000477301587 
-0.000162141935 
0.000867312000 
0.000017126000 
-0.000884375000 
-0.000786630556 
0.000211086905 
-0.000545033333 
-0.001017024138 
-0.000532920000 
-0.000976428571 
-0.000870564516 
-0.000092820000 
-0.000270604687 
-0.000131683333 
0.000032031546 


The  decoded  parameter  estimates  for  ¥4  ace 


MI  CBM 
MICBM 
MICBH 
MICBM 
MICBM 
POSC  3 
POSC3 
POSC  3 

;  posc3 

I  POSC 3 

POSC3 
POSC  3 
POSC3 
POSTRIC4 
POSTRIC4 
POSTRIC4 
POSTS I C4 
POSTRIC4 
POSTS IC4 
POSTRIC4 

[  TRID5 

l  TRID5 

}  TRID5 

{  TRID5 

TRIPS 
TRID5 
B-52PBH 
B-52PBM 
B-S2PBM 
B-52PEN 
B-52PEH 
B-52CMC 

e  B- 5  2  CMC 

l  B-52CMC 

B- 5 2 CMC 

PBIUPBM 

PB111PBH 

PB111PBM 

BIB 

BIB 

ATB 

! 


B-52PBH 

-0.000142548718 

B-52CMC 

0.000013468966 

FB111PBM 

-0.000168436667 

BIB 

-0.000049642857 

ATB 

-0.000261391935 

POSC  3 

-0.000378417969 

POSTRIC4 

-0.000401881510 

TRIOS 

-0.000330054874 

B-52PBM 

-0.000518954327 

B-52CMC 

-0.000772998384 

PB111PBM 

-0.000597333333 

BIB 

-0.000618723214 

ATB 

-0.000346207157 

POSTRIC4 

-0.000057056327 

TRID5 

-0.000191333499 

B-52PBM 

-0.000330416667 

B-52CMC 

-0.000532957375 

PB111PBM 

-0.000100407407 

BIB 

-0.000732888889 

ATB 

-0.000586917563 

TRID5 

0.000156053359 

B-52PBN 

-0.000172752595 

B-52CMC 

-0.000690874384 

FB1UPBH 

-0.000179686508 

BIB 

-0.000594812925 

ATB 

-0.000256035906 

B-52PBM 

-0.000131569691 

B-52CMC 

-0.000379778957 

FB111PBN 

-0.000236914530 

BIB 

-0.000504120879 

ATB 

-0.000352694376 

B-52CMC 

-0.000628391795 

FB111PBM 

-0.000221620690 

BIB 

-0.001846985222 

ATB 

-0.000938020022 

FBlllPBM 

0.000322833333 

BIB 

-0.001125000000 

ATB 

-0.000373317204 

BIB 

0.000874742857 

ATB 

0.000195852535 

ATB 

0.001210369407 

The  decoded  parameter  estimates  Eor  Y5  are 


IHTBRCBPT 

MMII 

MMIII 


-125.214476892050 

0.012928076306 

0.054679718141 
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The  decoded  parameter  est  lutes  for  Y5  are 


PKBBP 

HICBM 

POSC  3 

POSTRIC4 

TRID5 

B-52PBM 

B-52CMC 

PB111PBM 

BIB 

ATB 

IWII 

*  mu 

mu 

•  mm 

mu 

•  PKBBP 

mu 

•  MICBM 

mu 

•  P0SC3 

mu 

*  P0STRIC4 

mu 

*  TRID5 

mu 

•  B-52PBM 

mu 

*  B-52CMC 

mu 

•  PB111PBM 

mu 

•  BIB 

mu 

*  ATB 

mm 

•  mm 

mm 

•  PKBBP 

mm 

*  MICBM 

mm 

•  POSC  3 

mm 

*  POSTRIC4 

mm 

*  TRID5 

mm 

•  B-52PSN 

mm 

*  B-52CMC 

mm 

•  FB111PEM 

mm 

•  bib 

mm 

•  ATB 

PKBBP 

•  PKBBP 

PKBBP 

*  MICBM 

PKBBP 

t  POSC 3 

PKBBP 

•  POSTRIC4 

PKBBP 

*  TRID5 

PKBBP 

*  B-52PBM 

PKBBP 

*  B-52CMC 

PKBBP 

•  PB111PBN 

PKBBP 

•  BIB 

PKBBP 

*  ATB 

NICBM 

•  MICBM 

MI  CBM 

•  POSC3 

MICBM 

*  POSTRIC4 

MI  CBM 

*  TRID5 

MICBM 

*  B-52PBM 

MICBM 

•  B-52CMC 

MICBM 

*  PB1UPBM 

0.387007125205 

0.069343867570 

0.333503145141 

0.233209622389 

0.185094193969 

0.189473105676 

0.380679221401 

0.183295167488 

0.469928564274 

0.318958846779 

0.000004993778 

0.000001975309 

-0.000010111111 

0.000001638667 

-0.000014496528 

-0.000016242593 

-0.000009449471 

-0.000001531624 

-0.000001149425 

-0.000000925926 

-0.000003729524 

-0.000026030108 

0.000008793284 

-0.000052610667 

0.000005861333 

-0.000030729167 

-0.000030594444 

-0.000029199735 

-0.000023486610 

-0.000069348659 

-0.000031204444 

-0.000175634286 

-0.000068458781 

0.000104908000 

-0.000004500000 

-0.000359959375 

-0.000291144444 

-0.000064583333 

-0.000182212821 

-0.000373920690 

-0.000241666667 

-0.000408217143 

-0.000325200000 

-0.000011016000 

-0.000104003125 

-0.000057031944 

-0.000008184524 

-0.000052484615 

-0.000000431034 

-0.000054373333 


T 


Th«  decoded  parameter  estimates  for  YS  are: 


MI  CBM 

* 

BIB 

-0.000051251429 

MICBM 

* 

ATB 

-0.000083972581 

POSC  3 

* 

POSC3 

-0.000163688965 

POSC3 

t 

POSTS I C4 

-0.000197211372 

P08C3 

* 

TRIDS 

-0.000143694196 

POSC  3 

t 

B-52PBM 

-0.000192682292 

POSC3 

* 

B-52CMC 

-0.000279498922 

POSC3 

* 

FBlllPBM 

-0.000219729167 

POSC  3 

t 

BIB 

-0.00024232S893 

POSC3 

• 

ATB 

-0.000160S04032 

POSTRIC4 

* 

POSTRIC4 

-0.0000SS6SS864 

POSTRIC4 

t 

TRIDS 

-0.000081018519 

POSTRIC4 

* 

B-S2P8M 

-0.000122751068 

POSTRIC4 

t 

B-52CMC 

-0.000208034004 

P08TRIC4 

* 

FBlllPBM 

-0.000031828704 

POSTS IC4 

t 

BIB 

-0.000276289683 

POSTRIC4 

* 

ATB 

-0.000232484319 

TRID5 

* 

TRIDS 

-0.000022188563 

TRID5 

t 

B-S2P8M 

-0.000073211996 

T8ID5 

t 

B-52CMC 

-0.000248871100 

TRID5 

• 

FBlllPBM 

-0.000067460317 

TRID5 

* 

BIB 

-0.000243942177 

TRID5 

• 

ATB 

-0.000116527458 

B-S2PBM 

• 

B-52PBM 

-0.000054368836 

B-52PBM 

• 

B-52CHC 

-0.000139257294 

B-52PBM 

• 

FBlllPBM 

-0.000075051282 

B-52PBM 

• 

BIB 

-0.000182919414 

B-52PBM 

t 

ATB 

-0.000136993383 

B- 5 2 CMC 

* 

B-S2CMC 

-0.000188275862 

B-52CMC 

* 

FBlllPBM 

-0.000096982759 

B-52CMC 

* 

BIB 

-0.000592364532 

B-52CMC 

* 

ATB 

-0.000338223026 

FBlllPBM 

• 

FBlllPBM 

-0.000099133333 

PB111PBN 

• 

BIB 

-0.000397028571 

FBlllPBM 

* 

ATB 

-0.000133064516 

BIB 

* 

BIB 

-0.000055232653 

BIB 

* 

ATB 

-0.000243953917 

ATB 

* 

ATB 

0.000039081686 
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Appendix  U;  Postulated  Model  Completion  For  Tlx  Fifth  Objective 

The  decoded  parameter  estimates  ace  "fitted"  with  their  para¬ 
meters  to  make  up  the  completed  postulated  model  for  the  fifth 
objective.  The  parameter  estimates  are  taken  directly  from  the  decoded 
parameter  estimates  listed  for  the  fifth  objective  In  Appendix  T. 


Y5  =  -  125.214476892050 


■f 

0.012928076306 

* 

(MM1 I ) 

f 

0.054679718141 

t 

(MMIII ) 

♦ 

0.387007125205 

t 

(PKBBP) 

f 

0.069343867570 

t 

(KICBM) 

* 

0.333503145141 

* 

(POSC3) 

♦ 

0.233209622389 

* 

(POSTRIC4) 

+ 

0.185094193969 

* 

(TRID5) 

♦ 

0.189473105676 

* 

(B52PBM) 

♦ 

0.380679221401 

• 

(B57CMC) 

♦ 

0.183295167488 

t 

(PB111PBN) 

+ 

0.469928564274 

* 

(BIB) 

♦ 

0.318958846779 

* 

(ATB) 

♦ 

0.000004993778 

• 

(HMII ) 

(MII) 

t 

0.000001975309 

• 

(NHII) 

(MUD 

- 

0.000010111111 

t 

(Mil ) 

(PKBBP) 

♦ 

0.000001638667 

* 

(Mil) 

(MICBM) 

- 

0.000014496528 

• 

(Mil) 

(POSC3) 

- 

0.000016242593 

• 

(Mil) 

(POSTRIC4) 

- 

0.000009449471 

• 

(Mil) 

(TRID5) 

- 

0.000001531624 

• 

(MID 

(B52PBM) 

- 

0.000001149425 

* 

(Mil) 

(B52CMC) 

- 

0.000000925926 

* 

(MID 

(PB111PBN) 

- 

0.000003729524 

• 

(Mil) 

(BIB) 

- 

0.000026030108 

« 

(MID 

(ATB) 

♦ 

0.000008793284 

• 

(MUD 

•  (MUD 

- 

0.000052610667 

* 

(MUD 

•  (PKBBP) 

♦ 

0.000005861333 

• 

(Mill) 

•  (HICBH) 

- 

0.000030729167 

• 

(Mill) 

*  (P0SC3) 

- 

0.000030594444 

• 

(Mill) 

•  (P0STRIC4) 

- 

0.000029199735 

• 

(MUD 

*  (TRID5) 

- 

0.000023486610 

• 

(Mill) 

•  ( B52PBN ) 

- 

0.000069348659 

• 

(MUD 

•  (B52CMC) 

- 

0.000031204444 

• 

(MUD 

•  (PB111PBM ) 

- 

0.000175634286 

t 

(MUD 

*  (BIB) 

- 

0.000068458781 

• 

(Mill) 

#  (ATB) 

0.000104908000 

• 

(PK8SP) 

•  (PKBBP) 

— 

0.000004500000 

t 

(PKBBP) 

•  (MICBM) 
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0.000359959375 

* 

(PKBBP)  • 

(POSC  3) 

0.000291144444 

ft 

(PKBBP)  * 

(POSTKIC4) 

0.000064503333 

ft 

(PKBBP)  * 

(TRID5) 

0.000102212821 

* 

(PKBBP)  * 

(B52PBM) 

0.000373920690 

* 

(PKBBP)  * 

(B52CMC) 

0.000241666667 

* 

(PKBBP)  * 

(PB111PBM) 

0.000408217143 

* 

(PKBBP)  • 

(BIB) 

0.000325200000 

* 

(PKBBP)  * 

(ATB) 

0.000011016000 

* 

(HICBM)  * 

(MICBM) 

0.000104003125 

* 

(MICBM)  * 

(POSC3) 

0.000057031944 

* 

(HICBH)  * 

(POSTRIC4 ) 

0.000008184524 

* 

(HICBM)  * 

(TRID5) 

0.000052484615 

ft 

(HICBM)  • 

(B52PBM) 

0.000000431034 

ft 

(HICBM)  * 

(B52CMC) 

0.000054373333 

* 

(MICBM)  • 

(FBlllPBW) 

0.000051251429 

* 

(MICBM)  * 

(BIB) 

0.000083972581 

* 

(MICBM)  * 

(ATB) 

0.000163688965 

* 

(POSC 3)  * 

(P08C3) 

0.000197211372 

• 

( POSC 3)  * 

(POSTRIC4) 

0.000143694196 

• 

(POSC3)  • 

(TRID5) 

0.000192682292 

ft 

(POSC3)  • 

(B52PBM) 

0.000279498922 

• 

( POSC3 )  • 

(B52CMC) 

0.000219729167 

ft 

(POSC 3)  • 

(PB111PBM) 

0.000242325893 

* 

(POSC 3)  * 

(BIB) 

0.000160504032 

• 

(POSC 3)  • 

(ATB) 

0.000055655864 

ft 

(POSTRIC4) 

•  (POSTRIC4) 

0.000081018519 

• 

(POSTRIC4) 

•  (TRID5) 

0.000122751068 

* 

(POSTRIC4 ) 

*  (B52PBM) 

0.000208034004 

ft 

(POSTRIC4) 

*  (B52CMC) 

0.000031828704 

• 

(POSTRIC4) 

•  (PB111PBM) 

0.000276289683 

* 

(POSTRIC4) 

•  (BIB) 

0.000232484319 

* 

(POSTRIC4) 

•  (ATB) 

0.000022188563 

• 

(TRID5)  • 

(TRID5) 

0.000073211996 

ft 

(TRID5)  * 

(B52PBM) 

0.000248871100 

• 

(TRID5)  * 

(B52CMC) 

0.000067460317 

* 

(TRI05)  * 

(PB111PBM) 

0.000243942177 

• 

(TRID5)  * 

(BIB) 

0.000116527458 

• 

(TRID5)  * 

(ATB) 

0.000054368836 

• 

(B52PBM)  • 

(B52PBM) 

0.000139257294 

* 

(B52PBM)  « 

(B52CMC) 

0.000075051282 

• 

(B52PBM)  • 

(PB111PKM) 

0.000182919414 

ft 

(B52PBM)  « 

(BIB) 

0.000136993383 

ft 

(B52PBM)  * 

(ATB) 

0.000188275862 

• 

(B52CMC)  • 

(B52CMC) 

0.000096982759 

• 

(B52CMC)  * 

(PB111PBB) 

0.000592364532 

• 

(B52CMC)  • 

(BIB) 

0.000338223026 

• 

(B52CMC)  • 

(ATB) 

0.000099133333 

• 

(PB111PBM) 

•  (PB111PBM) 

0.000397028571 

• 

(PB111PBM) 

•  (BIB) 

0.000133064516 

• 

(PB1UPBM) 

*  (ATB) 

0.000055232653 

• 

(BIB)  •  (BIB) 

0.000243953917 

• 

(BIB)  •  (ATB) 

0.000039081686 

• 

(ATB)  •  (ATB) 
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Appendix  V:  Regression  Output  Foe  The  Reduced  Pop  tola  ted  Modal 

the  Cull  postulated  Model  Coc  the  fifth  objective  (regression 
output  Is  shown  In  Appendix  0)  is  reduced  froe  90  variables  to  16 
variables  (INTBRCBPT  not  Included).  The  regression  output  for  the 
reduced  Model  is  shown  below.  The  deleted  variables  are  shown  contri¬ 
buting  nothing  (zero)  to  the  Model  suM-of -squares  (SSR).  The  reduced 
variables  are  shown  last.  Cowpare  the  results  of  this  appendix  with  the 
results  for  the  full  Model  in  Appendix  0. 

Regression  Output  for  Dependent  Variable:  YS 


Model  Sum  of 
Squares  (SSR) 

10274.32 


Brror  Sum  of 
Squares  (SSB) 

700.20 


Total  Sum  of 
Squares  (SSTO) 

11054.52 


R-Square 

0.9294 


ParaMeters  Of  Y5  Sorted  In  Ascending  Order 


By  Their 

Sum  Of  Squares 

Type  I  Sum 

Percent 

SusMed  Pert 

NuMber 

Variable 

of  Squares 

Of  SSR 

Of  8SR 

1 

mil 

* 

mu 

0.000 

0.00 

0.00 

2 

mm 

• 

mm 

0.000 

0.00 

0.00 

3 

PKBBP 

• 

PKBBP 

0.000 

0.00 

0.00 

4 

MICBM 

• 

MICBM 

0.000 

0.00 

0.00 

5 

POSC  3 

t 

P08C3 

0.000 

0.00 

0.00 

6 

POSTRIC4 

• 

POSTRIC4 

0.000 

0.00 

0.00 

7 

TRID5 

• 

TRID5 

0.000 

0.00 

0.00 

0 

B-52PBM 

• 

B-52PBM 

0.000 

0.00 

0.00 

9 

B-52CMC 

• 

B-52CMC 

0.000 

0.00 

0.00 

10 

PB111PBH 

• 

FBlllPBH 

0.000 

0.00 

0.00 

11 

BIB 

• 

BIB 

0.000 

0.00 

0.00 

12 

ATB 

• 

ATB 

0.000 

0.00 

0.00 

13 

mu 

• 

mm 

0.000 

0.00 

0.00 

14 

mn 

• 

PKBBP 

0.000 

0.00 

0.00 

15 

mu 

• 

MICBM 

0.000 

0.00 

0.00 
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Parameters  of  TS  sorted  in  Ascending  Order 
By  Their  Sum  Of  Squares 


Type  I  Sum 

Percent 

Summed  Percent 

Number 

Variable 

of  Squares 

Of  SSR 

Of  SSR 

16 

MMII 

*  POSC3 

0.000 

0.00 

0.00 

17 

MM  1 1 

*  POSTRIC4 

0.000 

0.00 

0.00 

18 

MMII 

*  TRIPS 

0.000 

0.00 

0.00 

19 

MMII 

•  B-52PBM 

0.000 

0.00 

0.00 

20 

MMII 

*  B-52CMC 

0.000 

0.00 

0.00 

21 

MMII 

*  PBlllPBN 

0.000 

0.00 

0.00 

22 

MMII 

*  BIB 

0.000 

0.00 

0.00 

23 

MMII 

•  ATB 

0.000 

0.00 

0.00 

24 

MMII  I 

*  PKBBP 

0.000 

0.00 

0.00 

25 

(Will 

•  MICBM 

0.000 

0.00 

0.00 

26 

MMII  I 

•  POSC 3 

0.000 

0.00 

0.00 

27 

MMII  I 

•  POSTRIC4 

0.000 

0.00 

0.00 

28 

MMII  I 

*  TRIPS 

0.000 

0.00 

0.00 

29 

MMIII 

•  B-52PBM 

0.000 

0.00 

0.00 

30 

MMIII 

*  B-52CMC 

0.000 

0.00 

0.00 

31 

MMIII 

*  PBlllPBN 

0.000 

0.00 

0.00 

32 

MMIII 

•  BIB 

0.000 

0.00 

0.00 

33 

MMIII 

•  ATB 

0.000 

0.00 

0.00 

34 

PKBBP 

•  MICBM 

0.000 

0.00 

0.00 

35 

PKBBP 

•  POSC 3 

0.000 

0.00 

0.00 

36 

PKBBP 

*  POSTRIC4 

0.000 

0.00 

0.00 

37 

PKBBP 

*  TRIPS 

0.000 

0.00 

0.00 

38 

PKBBP 

•  B-52PBN 

0.000 

0.00 

0.00 

39 

PKBBP 

•  PBlllPBN 

0.000 

0.00 

0.00 

40 

PKBBP 

•  BIB 

0.000 

0.00 

0.00 

41 

PKBBP 

*  ATB 

0.000 

0.00 

0.00 

42 

MI  CBM 

t  POSC 3 

0.000 

0.00 

0.00 

43 

MICBM 

•  POSTRIC4 

0.000 

0.00 

0.00 

44 

MICBM 

•  TRIP5 

0.000 

0.00 

0.00 

45 

MICBM 

•  B-S2PBN 

0.000 

0.00 

0.00 

46 

MICBM 

•  B- 5  2  CMC 

0.000 

0.00 

0.00 

47 

MICBM 

•  PBlllPBN 

0.000 

0.00 

0.00 

48 

MICBM 

•  BIB 

0.000 

0.00 

0.00 

49 

MICBM 

*  ATB 

0.000 

0.00 

0.00 

50 

P08C3 

*  POSTS I C4 

0.000 

0.00 

0.00 

51 

POSC  3 

•  B-52PBN 

0.000 

0.00 

0.00 

52 

POSC  3 

•  B-52CMC 

0.000 

0.00 

0.00 

53 

P08C3 

•  PBlllPBN 

0.000 

0.00 

0.00 

54 

POSC3 

*  BIB 

0.000 

0.00 

0.00 

55 

POSC  3 

•  ATB 

0.000 

0.00 

0.00 

56 

POSTRIC4 

•  TRI05 

0.000 

0.00 

0.00 

57 

POSTS I C4 

•  B-52PBN 

0.000 

0.00 

0.00 

58 

POSTS I C4 

*  B-52CMC 

0.000 

0.00 

0.00 

59 

POSTS IC4 

•  PBlllPBN 

0.000 

0.00 

0.00 

60 

POSTS IC4 

•  BIB 

0.000 

0.00 

0.00 

61 

TRID5 

•  B-52PBN 

0.000 

0.00 

0.00 

Parameters  of  YS  Sorted  In  Ascending  order 
By  Their  Sue  Of  Squares 


Type  I  Sub 

Percent 

Suamed  Percent 

Number 

Variable 

of  Squares 

Of  SSB 

Of  SSR 

62 

TRID5 

*  PB111PBN 

0.000 

0.00 

0.00 

63 

TRID5 

•  BIB 

0.000 

0.00 

0.00 

64 

TRID5 

•  ATB 

0.000 

0.00 

0.00 

65 

B-52PBM 

*  B-52CNC 

0.000 

0.00 

0.00 

66 

B-52PBN 

•  FB111PBM 

0.000 

0.00 

0.00 

67 

B-52PBM 

•  BIB 

0.000 

0.00 

0.00 

68 

B-52PBN 

*  ATB 

0.000 

0.00 

0.00 

69 

B-52CHC 

•  FB1UPBN 

0.000 

0.00 

0.00 

70 

B-52CMC 

*  BIB 

0.000 

0.00 

0.00 

71 

B-52CHC 

•  ATB 

0.000 

0.00 

0.00 

72 

FB111PSN 

•  BIB 

0.000 

0.00 

0.00 

73 

PB111PBM 

*  ATB 

0.000 

0.00 

0.00 

74 

BIB 

•  ATB 

0.000 

0.00 

0.00 

75 

MM  1 1 

33.698 

0.33 

0.33 

76 

POSTRIC4 

•  ATB 

34.466 

0.34 

0.66 

77 

PKBBP 

*  B-52CMC 

37.628 

0.37 

1.03 

78 

P0SC3 

«  TRID5 

38.192 

0.37 

1.40 

79 

PB111PSM 

39.125 

0.38 

1.78 

80 

Ml  CBN 

74.025 

0.72 

2.50 

81 

TRID5 

•  B-52CMC 

94.090 

0.92 

3.42 

82 

B-52PBN 

253.805 

2.47 

5.89 

83 

HNIII 

446.900 

4.35 

10.24 

84 

POSTRIC4 

541.260 

5.27 

15.51 

85 

B-52CHC 

656.000 

6.38 

21.89 

86 

BIB 

701.521 

6.83 

28.72 

87 

POSC3 

733.597 

7.14 

35.86 

88 

PKBBP 

1150.397 

11.20 

47.06 

89 

ATB 

1448.373 

14.10 

61.15 

90 

TRID5 

3991.239 

38.85 

100.00 

For 

Y5:  Residuals 

Associated  Vlth  The  Design  Points 

Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

1 

85.75 

87.78 

-2.03 

2 

74.36 

75.08 

-0.72 

3 

68.57 

65.21 

3.36 

4 

82.90 

84.10 

-1.20 

5 

80.32 

78.81 

1.51 

6 

83.35 

82.50 

0.85 

7 

82.53 

81.04 

1.49 

8 

85.01 

86.33 

-1.32 

9 

73.23 

73.62 

-0.39 

For  Y5 :  Residuals  Associated  with  The  Design  Points 


Design  Point 

ABM's  Response 

Postulated  Model's  Response 

Residual 

10 

64.12 

63.76 

0.36 

11 

82.16 

82.65 

-0.49 

12 

79.48 

77.36 

2.12 

13 

56.77 

58.48 

-1.71 

14 

67.57 

68.34 

-0.77 

15 

69.47 

69.79 

-0.32 

16 

58.67 

59.93 

-1.26 

17 

83.88 

86.46 

-2.58 

18 

82.44 

82.47 

-0.03 

19 

79.43 

76.66 

2.77 

20 

81.03 

80.64 

0.39 

21 

73.86 

72.16 

1.70 

22 

78.27 

77.98 

0.29 

23 

74.90 

72.69 

2.21 

24 

81.25 

81.17 

0.08 

25 

79.58 

77.19 

2.39 

26 

72.99 

71.37 

1.62 

27 

78.11 

75.35 

2.76 

28 

66.84 

66.88 

-0.04 

29 

59.61 

62.89 

-3.28 

30 

69.76 

68.71 

1.05 

31 

76.52 

73.99 

2.53 

32 

66.78 

68.18 

-1.40 

33 

86.08 

87.58 

-1.50 

34 

84.25 

88.19 

-3.94 

35 

63.71 

67.55 

-3.84 

36 

75.38 

76.63 

-1.25 

37 

74.12 

74.48 

-0.36 

38 

85.41 

85.43 

-0.02 

39 

81.10 

79.12 

1.98 

40 

81.88 

81.27 

0.61 

41 

79.79 

77.55 

2.24 

42 

57.17 

56.90 

0.27 

43 

68.83 

70.32 

-1.49 

44 

67.53 

68.17 

-0.64 

45 

55.86 

54.75 

1.11 

46 

78.97 

75.40 

3.57 

47 

83.59 

86.04 

-2.45 

48 

62.45 

65.40 

-2.95 

49 

80.80 

81.91 

-1.11 

50 

80.16 

80.34 

-0.18 

51 

78.33 

76.36 

1.97 

52 

79.09 

77.93 

1.16 

53 

70.63 

71.15 

-0.52 

54 

77.41 

75.14 

2.27 

55 

72.33 

72.99 

-0.66 

56 

79.60 

79.76 

-0.16 

57 

78.84 

78.19 

0.65 
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For  Y5:  Residuals  Associated  with  The  Design  Points 


Design  Point 

ABN's  Response 

Postulated  Model's  Response 

Res idual 

58 

72.92 

74.21 

-1.29 

59 

75.95 

75.77 

0.18 

60 

65.07 

69.00 

-3.93 

61 

61.98 

67.44 

-5.46 

62 

69.23 

71.42 

-2.19 

63 

74.75 

73.57 

1.18 

64 

67.54 

69.59 

-2.05 

65 

83.37 

87.48 

-4.11 

66 

79.47 

80.86 

-1.39 

67 

75.37 

74.46 

0.91 

68 

81.13 

81.08 

0.05 

69 

76.76 

75.26 

1.50 

70 

80.34 

81.66 

-1.32 

71 

75.53 

74.89 

0.64 

72 

80.34 

80.71 

-0.37 

73 

76.29 

74.09 

2.20 

74 

64.53 

67.68 

-3.15 

75 

76.02 

74.31 

1.71 

76 

65.92 

68.49 

-2.57 

77 

54.30 

61.87 

-7.57 

78 

66.28 

68.27 

-1.99 

79 

76.39 

75.04 

1.35 

80 

65.24 

68.64 

-3.40 

81 

86.49 

89.98 

-3.50 

82 

79.88 

82.54 

-2.66 

83 

79.38 

80.98 

-1.60 

84 

85.98 

88.42 

-2.44 

85 

74.40 

72.62 

1.78 

86 

75.00 

74.19 

0.81 

87 

71.84 

70.45 

1.39 

88 

83.84 

86.24 

-2.40 

89 

77.09 

74.65 

2.44 

90 

76.55 

73.09 

3.46 

91 

83.35 

84.68 

-1.33 

92 

70.66 

68.88 

1.78 

93 

54.97 

57.29 

-2.32 

94 

58.06 

58.86 

-0.80 

95 

67.65 

66.75 

0.90 

96 

65.05 

65.18 

-0.13 

97 

85.18 

88.60 

-3.42 

98 

81.68 

81.98 

-0.30 

99 

80.20 

77.99 

2.21 

100 

83.76 

84.62 

-0.86 

101 

70.65 

68.82 

1.83 

102 

73.83 

72.81 

1.02 

103 

72.04 

71.35 

0.69 

104 

84.45 

87.15 

-2.70 

105 

80.93 

80.53 

0.40 

289 


Foe  Y$:  Residuals  Associated  with  The  Design  Points 


Design  Point  ABM's  Response  Postulated  Model's  Response  Residual 


79.38 

76.54 

2.84 

83.03 

83.17 

-0.14 

68.51 

67.37 

1.14 

57.26 

60.75 

-3.49 

64.52 

64.73 

-0.21 

66.66 

66.18 

0.48 

59.41 

62.20 

-2.79 

83.45 

87.27 

-3.82 

76.56 

77.75 

-1.19 

74.34 

71.35 

2.99 

81.50 

80.86 

0.64 

79.87 

76.88 

2.99 

81.96 

83.28 

-1.32 

78.96 

78.00 

0.96 

80.57 

81.98 

-1.41 

73.43 

72.47 

0.96 

64.53 

66.06 

-1.53 

78.45 

75.58 

2.87 

74.62 

71.60 

3.02 

57.24 

62.08 

-4.84 

69.35 

68.48 

0.87 

74.92 

73.77 

1.15 

68.19 

67.37 

0.82 

82.11 

82.54 

-0.43 

81.54 

80.97 

0.57 

79.43 

76.74 

2.69 

80.01 

78.30 

1.71 

66.49 

67.66 

-1.17 

76.30 

76.23 

0.07 

75.18 

74.78 

0.40 

81.28 

81.09 

0.19 

80.69 

79.52 

1.17 

78.53 

75.29 

3.24 

79.14 

76.85 

2.29 

65.00 

66.20 

-1.20 

62.43 

64.64 

-2.21 

73.65 

73.21 

0.44 

75.09 

74.66 

0.43 

63.65 

66.09 

-2.44 

81.49 

82.48 

-0.99 

77.65 

75.86 

1.79 

77.04 

74.30 

2.74 

80.91 

80.92 

-0.01 

79.96 

78.77 

1.19 

80.54 

80.33 

0.21 

77.37 

75.05 

2.32 

78.50 

77.20 

1.30 

69.46 

70.58 

-1.12 

L. 


Taken  fron  the  DBCODB.OUT  file,  the  decoded  coefficients  foe  the 
fifth  objective's  reduced  postulated  Model  are  shown  below.  Coapare 
this  output  with  the  decoded  output  for  the  full  postulated  Model  for 
the  fifth  objective  shown  in  Appendix  T. 

The  decoded  paraMeter  estiMates  for  Y5  are: 


INTBRCBPT 

-3.687629292556 

MM  1 1 

0.003225022222 

MNIII 

0.011744444444 

PKBBP 

0.121438027586 

MI  CBM 

0.010754700000 

P08C3 

0.077041093750 

P08TRIC4 

0.054804722222 

TRID5 

0.105882105911 

B-52PBM 

0.025530897436 

B-52CMC 

0.11S705689655 

PB111PBM 

0.026062666667 

BIB 

0.094593714286 

ATB 

0.149263978495 

MMII 

mu 

0.000000000000 

MHII 

miu 

0.000000000000 

MMII 

PKBBP 

0.000000000000 

MMII 

MICBM 

0.000000000000 

MMII 

POSC  3 

0.000000000000 

l«II 

P08TRIC4 

0.000000000000 

MMII 

TRID5 

0.000000000000 

mu 

B-52PBN 

0.000000000000 

mu 

B-52CMC 

0.000000000000 

mu 

PB111PBM 

0.000006000000 

mu 

BIB 

0.000000000000 

mu 

ATB 

0.000000000000 

mm 

mm 

0.000000000000 

mm 

PKBBP 

0.000000000000 

mm 

MICBM 

0.000000000000 

mm 

POSC3 

0.000000000000 

mm 

POSTS I C4 

0.000000000000 

mui 

TRIOS 

0.000000000000 

miu 

B-S2PBM 

0.000000000000 

mm 

B-S2CMC 

0.000000000000 

mm 

PB1UPBM 

0.000000000000 

miu 

BIB 

0.000000000000 

mm 

ATB 

0.000000000000 

PKBBP 

PKBBP 

0.000000000000 

PKBBP 

MICBM 

0.000000000000 

■  I  ■  ,  I  IMEgP 
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PKIKP 

• 

POSC  3 

0.000000000000 

PKRKP 

• 

P0STRIC4 

0.000000000000 

PKUP 

* 

TRIOS 

0.000000000000 

PKRKP 

* 

B-52PBM 

0.000000000000 

PKBKP 

« 

B-52CMC 

-0.000373920690 

PKBBP 

* 

FB111PBM 

0.000000000000 

PKBBP 

• 

BIB 

0.000000000000 

PKBBP 

• 

ATB 

0.000000000000 

MI  CBM 

• 

MICBM 

0.000000000000 

MICBM 

• 

POSC  3 

0.000000000000 

MI  CBM 

• 

P0STRIC4 

0.000000000000 

MICBM 

• 

TRIOS 

0.000000000000 

MICBM 

• 

B-S2PBM 

0.000000000000 

MICBM 

* 

B-52CMC 

0.000000000000 

MICBM 

* 

PB111PBM 

0.000000000000 

MICBM 

* 

BIB 

0.000000000000 

MICBM 

• 

ATB 

0.000000000000 

P0SC3 

• 

P0SC3 

0.000000000000 

POSC  3 

• 

P0STRIC4 

0.000000000000 

P0SC3 

• 

TRID5 

-0.000143694196 

POSC  3 

ft 

B-S2PBM 

0.000000000000 

P08C3 

• 

B- 52 CMC 

0.000000000000 

POSC  3 

* 

PB111PBM 

0.000000000000 

POSC  3 

• 

BIB 

0.000000000000 

POSC  3 

ft 

ATB 

0.000000000000 

P0STRIC4 

• 

P0STRIC4 

0.000000000000 

P0STRIC4 

• 

TRIOS 

0.000000000000 

P0STBIC4 

• 

B-52PBM 

0.000000000000 

P08TKIC4 

* 

B-52CMC 

0.000000000000 

P08TRIC4 

ft 

FB111PBM 

0.000000000000 

P08TRIC4 

ft 

BIB 

0.000000000000 

P0STRIC4 

• 

ATB 

-0.000232484319 

TRIOS 

« 

TRIOS 

0.000000000000 

TRIOS 

• 

B-52PBM 

0.000000000000 

TRIOS 

* 

B-S2CMC 

-0.000248871100 

TRI05 

ft 

PB111PBR 

0.000000000000 

TRIOS 

ft 

BIB 

0.000000000000 

TRIOS 

ft 

ATB 

0.000000000000 

B-S2PBM 

• 

B-52PBM 

0.000000000000 

B-S2PBM 

* 

B-S2CMC 

0.000000000000 

B-S2PBM 

* 

PB111PRM 

0.000000000000 

B-52PBM 

• 

BIB 

0.000000000000 

B-S2PBM 

• 

ATB 

0.000000000000 

B- 5 2 CMC 

ft 

B-52CHC 

0.000000000000 

B-S2CMC 

• 

PB111PBM 

0.000000000000 

B-S2CMC 

• 

BIB 

0.000000000000 

B-S2CMC 

• 

ATB 

0.000000000000 

FB111PBM 

• 

FBI ii pim 

0.000000000000 

PBI11PBM 

• 

BIB 

0.000000000000 

PB111PBM 

• 

ATB 

0.000000000000 

BIB 

• 

BIB 

0.000000000000 

BIB 

• 

ATB 

0.000000000000 

ATB 

* 

ATB 

0.000000000000 
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